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KO GENETRAU PROGRAM CONSlOr^.-^TIONi:. 

1.1 PROGRAM ABSTRACT 

C/OHXAO IS PART OF THE OHC 11 FUNCTIONAL VERIFICATION TEST. 
THIS PART OF THE TEST PERF.. 'MS EXTENSIVE DATA TRANSMISSION AND 
RECEPTION TESTS. THIS PART /LSO INCLUDES A KEYBOARD ECHO AND 
MODEM LOOPBACK TEST. 

THIS DIAGNOSTIC HAS BEEN \r ^ :\ FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWAP^. V ' > t ''■' ^QR) . THESE SERVICES PROVIDE 
THE INTERFACE TO THE QPER.A . Jrt AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXDF.. ACT, APT. SLIDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER 
TO THE XXDP* USER'S MANUAL. THtRL IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCT IONS -COMMANDS 
OF THIS DOCUMENT, 



1.2 SYSTEM REQUIREMENTS 

THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DHU-U FVT; 

UNIBUS PROCESSOR WITH AT LEAST 52K BYTES OF MEMORY. 

DHU BOARDS INSTALLED ON THE UNIBUS. 

APPROPRIATE PROGRAM LOAD DEVICE S'JPPORTING XXDP* 
MEDIA OR A DOWN LINE LOADING SYSTEM. 



1.3 RELATED DOCUMENTS AND STANDARDS 

XXDP» USER'S MANUAL DFSCHIBt-S THt RUNNING OF DIAGNOSTIC^ 
UNDER THE XXDP* MONITOR. 

1.4 DIAGNOSTIC HIERARCy PREREQUliilTt S 

THE PROCESSOR. THE UNIBUS. THfc S'^TtM Ml HOP » . iHf QONSOLl TtRMINAl 
AND THE L OAO MEDIA ARE ASSUMED TQ HAVL UtEN iLtiTEU AND KQUND WUHKING 
SEFORfc THIS PROGRAM lb RUN* 
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2,0 OPERATING INSTRUCTIONS 



THIS SECTION 
FOR DETAILPO 



CONTAINS A BRIEF DESCRIPTION OF 
INFORMATION, REFER TO THE XXDP* 



THE RUNTIME SERVICES. 
USER'S MANUAL CCHQUS) 



3.1 COMMANDS 



THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP* USER'S MANUAL HAS MORE DETAILS, 



COMMAND 

START 
RESTART 

CONTINUE 
PROCEED 
EXIT 
ADD 

DROP 
PRINT 



DISPLAY 

FLAGS 

/FLAGS 



EFFECT 



START THE DIAGNOSTIC FROM AN INITIAL STATE 

START THE OI'^GNOSTIC WITHOUT INITIALISING 

CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER tC) 

CONTINUE FROM AN ERROR HALT 

RETURN TO XXOP* MONITOR (XXDP* OPERATION ONLY!) 

ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 

CONSIDERED TO BE ACTIVE AT START TIME 

DEACTIVATE A UNIT 

PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 

BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 

REPORTS SECTION OF THIS DOCUMENT) 

TYPE A LIST OF ALL DEVICE INFORMATION 

TiPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 

CLEAR ALL FLAGS (SEE Fl AGS SECTION"* 



B^ THf FIRST 
STrt- INSTEAD 



A COMMAND CAN BE RECOGNISED 

tOU MAI. FOR FXAMPlt, ^iPt 

MORE INFORMATION CAN BF FOUND WITHIN THE 

EXTENDED COMMAND SYNTAX 



THRFE CHARACTFRS. 
Of "START . 
SECTION LABELLED 



SO 



Gl 
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THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MOOrt-Y SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LEGAL CCMMANOS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW. A DECIMAL NUHBER IS DESIGNATED BY "DDDDD". 

SWITCH EFKECr 

/TESTS:LIST 

/PASS: DDDDD 
/FLAGStFLGS 

/EOP: DDDDD 

/UNITS;LIST 

EXAMPLE or SWITCH USAGE: 



EXECUTE ONLY THOSE TESTS SPECIFIED IN 

THE LIST. LIST IS A STRING OF TEST 

NUMBERS, FOR EXAMPLE - /TESTS : 1 :5: 7 - U 

THIS LIST WILL CAUSE TESTS 1.5,7.8,9,10 TO 

BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 

EXECUTE OODOD PASSES (DDDDD - 1 TO 64000) 

SET SPECIFIED FLAGS. SEE THE FLAGS SECTION 

OF THIS DOCUMENT. 

REPORT END OF PASS MESSAGE AFTER EVERY 

ODOOO PASSES ONLY. (DDDDD • 1 TO 640OO) 

TEST/AOD/OROP ONLY THOSE UNITS SPECIFIED 

IN THE LIST. LIST EXAMPLI-. /UNITS :0: 5: 10 Ic? 

USE UNITS 0.5,10.11,12 (UNIT NUMBERS - 0-65) 



STAR'/Tr3iS:l-5/PASS:1000/E0P:100 

THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGh 'S UILl BE 
EXECUTED. 2) ALL UNITS WILL TESTED 1000 TIMES ANO 5) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PACSES ONL l . A 
SWITCH CAN BE RECOGNIZED Br THE FIRST THREE CHARACTERS. >0V MAY, 
FOR EXAMPLE. TYPE '■/TES:1 5" INSTEAD OF "/TESTS:l S". 

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED Bt EACH 
COMMAND . 



TESTS PASS 



FLAGS fOP 



UNITS 



START 


X 


X 


^ V « * 

X 


> 


X 


RESTART 


X 


X 


X 


X 


X 


CONTINUE 




X 


X 


X 




PROCEED 






X 






DROP 










X 


ADD 










X 


PRINT 












OISPl At 










X 


FLAGS 












zn AGS 












EXIT 
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r^AQS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALl FLAGS ARE CLEAREO AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 
ARE ALSO CLEAREO AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH, THE ZFLAGS COMMAND HAY ALSO BE USED TO CLEAR 
ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS. 
NO COMMANDS AFFECT THE STATE OF THE FLAGSj THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 

FLAG EFFECT 



HOe HALT ON ERROR - CONTROL IS RETURNED TO 

RUNTIME SERVICES COMMAND MODE 
LOE LOOP ON ERROR 

lER* INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 

FIRST LEVEL (FIRST LEVEL CONTAINS 

ERROR TYPE. NUMBER, PC, TEST AND UNIT) 
IXR* INHIBIT EXTENDED ERROR REPORTS (THOSE 

CALLED BY PRINTX MACRO'S) 
PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOF "BELL" ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBTT STATISTICAL REPORTS (DOES NOT 

APPLY TO DIAGNOSTICS WHICH DO NOT SUPPOKT 

SlATISTICAL REPORTING) 
lOR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 

HAVE EVALUATION SUPPORT) 

*SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT 

SEt THE XXOP* v'SER'S MANUAL FOR MORt DETAILS ON FLAGS. ^OU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE f-LAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PRCiRAM TO LOOP ON ERRQR. INHIBIT ERROR REPORTS 
AND TYPE A "BELL' ON ERROR, YOU MAY USE THE FOLLOWING bTRiNU: 

/FLAGS:LOEtX£R;QOt 



II 
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c\4 EXTENDED COMMAND SYNTAX 
.'^.4.1 START COMMAND - 

**«•****«*«** A********** ************** 4 ******* 4 v*44ij«i*4ii4t.4** 

STA(RT)/TESTSi<TEST-LIST>/PASS:<PASS-CNTWFLAGS: 
<rLAG-LIST>/EOP:<INCR> 



r. 4.1.1 TESTS SWITCH C /TESTS: <TEST -LIST> ) - 

<TEST-LIST* IS A SEQUENCE OF DECIMAL NUMBERS Cl:2 ETC.) OR RANGES 
Of DECIMAL NUMBERS C -5:8-10 ETC.). SEPERATEO BY COLONS. THAT SPECIFY 
THE TESTS TO BE EXECUTED. TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES. THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY 
THE OPERATOR. SEE EXAMPLE AT END OF "EFFECT OF START COMMAND" 
SECTION. 



?.4.1.2 PASS SWITCH (/PASS:<PASS-CNT>) - 

<PASS-CNT> I? A DECIMAL NUMBER INDICATING THE DESIRED NUMBER OF 
PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
(ALL SELECTED TESTS). THE DEFAULT IS NON-ENDING EXECUTION. IN THIS 
CASE. EXIT FROM T:-€ PROGRAM IS ACCOMPLISHED EITHER BY TYPING A 
CONTROL/C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT END 
OF "EFFECT OF START COMMAND" SECTION. 



^.4.1.3 FLAGS SWITCH ( /FLAGS: <FLAG-LISTO 

<FLAG-LISTi IS A SEQUENCE OF ELEMENTS OF THE f ORM <HAG>, 
<FLAG-l>. OR <FLAG-0>, SEPARATED BY COLONS, WHERE <FLAG> HAS ONE OF 
THE FOLLOWING VALUEb: 

HOE HALT ON ERROR. CAUSING COMMAND MODE TO 

BE ENTERED WHEN AN ERROR IS ENCCfNTERED , 
LOE LOOP ON ERROR, CAUSING THF DTAGNO^iTIC TO 

LOOP CONTINUOUSLY WITHIN THE SMALLKSl 

DEFINED BLOCK OF CfOlNG (SEGMfNT. SUBTEST. 

OR TEST) CONTAINING THE ERROR. 
IfcR INHIBIT ERROR REPORTING. 
IBE INHIBIT BASIC ERROR REPORTS. 
iXt INHIBIT EXltNOEO ERROR RFPORTS. 
PPI DIRECT ALL MESSAGES TO A LINE PRINTtR. 
PNT PRINT NUMBER Or TEST BEI'rt. EXECUTED. 
BOF BELL ON ERROR (NOT RELA^fD TO BELL PROMPTING). 
HAM RUN IN UNATTENDED MODE. BrPASSING MANUAL 

INTERVENTION (ILLEGAL FOR THIS DIAGNUjT1C\ 
ISR INHIBIT bTATlSTICAL REPORTS. 



Jl 
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INHIBIT DROPPING OF UTIITS B> DIAGNOSTIC. 

(HAS NO EFFECT IN THIS DIAt.NOSTIC) 
LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATED TO ARE 
CLEARED. A FLAf. NOT SPECIFIED IS CLEARED, IF THE FLAGS SWITCH IS NOT 
GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND" SECTION. 



.^4.1.4 END OF PASS SWITCH C/E0P:'INCRO ■ 

<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE PRINTED. THE 
D:FAULT is AT THE END OF EVERY PASS. SEE EXAMPLE AT END OF "EFFECT OF 
START COMMAND" SECTION. 



2.4.1.5 EFFECT OF START COMMAND - 

THE EFFECT OF THE 3TART COMMAND IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE. THE 
INITIALIZATION QUESTIONS, AND THEN THE DIAGNOSTIC COMMENCES TESTING. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION "* 
UNITS (D) ?" TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER OF 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUESTIONS WHEREBY THE 
P-TABLES THEMSELVES ARE BUILT. EACH P-TABLE IS A CORE-RESIDENT TABLE 
CONTAINING ALL THE HARDWARE INFORMATION FOR ONE COMPLETE UNIT. EACH 
QUESTION IS FOLLOWED BY THE RESPONSE RADIX (D FOR DECIMAL. B FQR 
BINARY. FOR OCTAL, L FOR YES/NO) IN PARENTHESES AND THE DEFAULT 
VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P TABLE 
QUESTIONS SEE THE "HARDWARE PARAMETERS" SECTION. 

F0LL0W;.v4G THE HARDWARE QUESTIONS ARE THE SOFTwARe QUESTIONS W 
BUILD THE SOFTWARE TABLES. WHICH DEFINE OPERATING PARAMETERS OF THt 
DIAGNOSTIC PROGRAM. THESE QUE.STIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS" SECTION. 

EXAMPLE: 

STA/TESTS:l:3-4:/PASS:3/FLAL-' Tf:.R.HOE»l 



THIS COMMAND WILL CAUSE THREE PAS5L S TO Bf MADE. WITH EACH PASS 
CONSISTING OF TESTS l.S, AND 4. THERE IS NO DIFFERENCE BETWEEN SAi ING 
'FLAG^ AND SAYING <FLAG-l>. THE NOTATION <H AG'O^ IS MEANINGFU ONL t 
ON A COMMAND OTHER THAN START TO CLEAR A H A(, THAT WAS PRFVIOUSLi St;T» 
NOTE THAT ON ALL COMMANDS ONLY TH£ FIRiiT THRtt LETTERS ARE SCANNLD, 



Kl 
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r.4.^ RESTART COMMAND 

RES(TARTVTeSTS:<Tf.ST Ll3T>/PMSSi<PASS CNT>/Fl AGS: 
<FLAG-LIST>/UNITS:<UNIT-LIST> 



2.4.2,1 TESTS. PASS, AND FLAGS SWITCHES - 

<TEST-L1ST>» <PASS-CNT>, AND <FLAG-LIST> ARE AS IN 

COMMAND, 



THE START 



2. 4.?. 2 UNITS SWITCH ( /UNITS: <UNIT -LIST> ) - >iNIT-LIST> IS A SEQUENCE 
OF DECIMAL NUMBERS CO.l ETC.) OR RANGES OF DECIMAL NUMBERS (0-5. 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED, THE NUMBERS ARE SEPARATED 
B1 COLONS. THE NUMBERS MAY RANGE FROM THRU N-l (N IS THE NUMBER OF 
LWITS SPECIFIED IN THE PREVIOUS START COMMAND), THE NUMBER INDICATES 
THE POSITION OF THE P-TABLE AS THE DATA WAS ENTERED DURING THE 
HARDWARE OIAGLOGUE . THE UNITS WHICH ARE SELECTED MUST NOT HAVE :.EEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION 0^ ADD '^ND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NT BEEN 
DROPPED BY A DROP COMMAND. 



2.^.2.3 EFFECT OF RESTART COMMAND ^ 

THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P- TABLES FROM THE PREVIOUS START COMMAND (THERE MUbT HAVE BEEN ONE) 
ARE USED, INSTEAD OF NEW ONES BEING BUILT. THE UNITS 
NOT BE USED WITH THIS PROGRAM. THE SOFTWARE DIALOGL^t 
BE REEXECUTED (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USFD AFTER 
COMMAND MODE HAS PEEN REENTERED IN ANY OF THE THRFt NORMAL WA>S: A) 
THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE. B) AN ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET. OR C) A CONTROL /C WAS 
ENTERED BY THE OPERATOR. 



SWITCH SHOULD 

MAY OPlIUNALLt 



2.4.3 CONTINUE COMMAND 

CONC TINUE )/PASS: <PASS-CNT/FLAGS: <FLAG lisr > 



2,4.3.1 FLAG SWITCH C /FLAGS : <ri AG LISTO 

<FLAG LIST> rs SAMf AS IN THE START COMMAND, HUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUF . 



LI 
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2,4.3.^ EFFECT OF CONTINUE COMMAND - 

CONTINUE MUST FOLLOW A START OR RESTART, ANU COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EF'^^tCT 
or THE COMMAND I i TO GO ]0 THE BEGINNING OF THE TEST THAT WAS 3EING 
EXECUTED WHEN THl HALT OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAv 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGtr'. 



2.4.4 PROCEED COMMAND - 
PR0(CEE0)/FLAGS:<FLAG-LIST> 



2.4.4.1 FLAGS SWITCH ( /FLAGS: <FLAG-LIST> ) 

<FLAG-LIST> IS AS IN THE START COMMAND. BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 



P.4.4.2 EFFECT OF PROCEED COMMAND - 

PROCEED MUST FOLLOW A START. RESTART. OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROf*. THE E' ECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



a. 4, 5 AUD CUMHAND - 
ADD/lf;iTS:<UNIT 1.1. 



2.4.6 EFFECT OF ADD COMMAKO - 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE. EACH 
UNIT M^JST HAVE A P-TABLt IN MEMORY DUE TO AN EARLIER 
HAPOWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED Bi A 
RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADO COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 



2.4.7 DROP COMMAND 
DROCP)/UNITS:'UNIT LIST> 



Ml 
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2.4.8 EF-ECT OF CROP COMMAND - 

THE UNITS SPECIFIEL WILL. BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWI i CH MUST BE ENTERED. ^hIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 



2.4.9 PRINT COMMAND - 

PRI(NT) 



2.4,9.1 EFFECT OF PRINT COMMAND 

THE TOTAL NL^IBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR CINHIBIT 
STA-^TSTICAL REPORTING) FLAG IS CLEARED. 



2.4.10 DISPLAY COMMAND - 
DISCPLAY )/UNITS:<UNIT -LIST > 



2.4.10.1 EFFECT OF DISPLAY COMMAND - 

THE HARDWARE P- TABLE FOR THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 



2.4.11 FLAGS COMMAND - 

FLA(GS) 
**«4i4444**4<)i44*4k*44444k4t*4k4i4L4«444444i4>4>4t44>4>4i444>*44*44>44L*4444 



2.4»11.1 EFFECT OF FLAGS COMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 



Nl 
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2.4.12 ZFLAGS COMMAND 

ZFL(AGS) 

2.4.15 ZFl.AGS COMMAND - 

ALL FLAGS ARE CLEARED. 

£.4.14 CONTROL ':hARACTERS - 

C A CONTROL/C (C) entered during the EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE. 



Z A CONTROL/Z (7) ENTERED DURING ONE Of" THE TUG 
OPERATOR DIALOGUES- HARDWARE P- TABLE DIAuOGUE OR 
SOFTWARE P-TABLE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 



A CONTROL/O (0) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL TELETYPE OUTPUT TO BF 
SURPRESSED FOR THE REMAINDER OF THt DIAGNOSTIC LR 
UNTIL ANOTHER CONTROL/0 IS TYP£D, WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 



Be' 
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2»5 HARDWARE QUESTIONS 

WHEN A DIAGNOSriC IS STARTED, THE RUNTIME SERVICES WILL PROMPf 
THE USER FOR HARDWARE INFORMATION BY TYPING "CHANGE HW (L) ?" 
YOiJ MUST ANSWER "Y" AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOAOED" USING THE SETUP UTILITY (SEE 
CHJ^'^fER 6 OF THE XXDP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y", THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 

1. CSR ADDRESS THIS QtJESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 

2. INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR AOORESS OF TH^ SPECIFIED DHU-H. THE DEFAULT ANSWER 
FOR THIS QUESTIOrj IS 310 (OCTAL). 

3, ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 
MAP OF THE SERIAL COMMUNICATION LINES ON THE DHUll WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE. BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE (I.E. BIT 5 FOR LINE 
5 ) THAT LINE WILL BE TESTED BY THE FVT. THE DEFAU.T ANSWER 
FOR THIS QUESTION IS ALL LINES I.E. 177777. 

4, TYPE OF LOOPBACK (1-INTERNAL, 2-H3029 OR H5277. 5-H525 

4-MOOeM. 5-KEYBOARO ECHO). 
THIS QUESTION REQUESTS THE TYPE OF LOOPBACK TO BE USED WHEN 
TESTING THE DHU-U. 
THE FOLLOWING TYPES ARE SUPPORTED: 

INTERNAL - ONLY INTERNAL UART LOOPBACK IS TO BE USED IN 
TESTING THE DHU-U. 

H5029 OR H5277 - STAGGERED LOOPBACK CONNECTORS ARE PROVIDED 
ON THE DHUU DISTRIBUTION PANEL (H5029) IF THIS DISTRIBUTION 
PANEL IS NOT PRESENT THEN H3277 STAGGERED BERG CONNfCT0R(5) 
MUST BE INSTALLED ON THE BERG CONNECTOR SOCKETS OF THE DHUU. 

H325 - SINGLE LINE, 25 PIN LOOPBACK CONNECTORS (TYPE H525) 
ARE INSTALLED ON THE LINES TO BE TESTED. 

MODEM - THE OPERATOR IS ALLOWED TO SET (.fP A MODEM LINK 
AND THEN PERFORM A TRANSMISSION ANO RECEPTION TEST AT A 
SINGLE BAUORATE WITH THE MODEM CONTROL SIGNALS DTR AND RTS 
ACTIVE. THIS IS A SPECIAL TEST AND ALL OTHER TESTS IN THIS 
PART WILL BE PERFORMED IN INTERNAL LOOPBACK. 

KEYBOARD ECHO - THE UARTS ON THE OUT ARE PLACED IN REMOTf- 
LOOPBACK. TERMINALS (OR OTHER COMM^lNICAT IONS FQUlPHtNTl 
WILL HAVE WHATEVER THEt TRANSMIT TO THE OHU LOOPED BACK TO 
THEM. 






^,t SOFTWARE QUESTIONS 

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

OR CONTIN'JE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 

PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MOOES. YOU WILL BE PROMPTED Br "CHANGE SW (L) ?" 

IF YOU WISH TO CHANGE ANV PARAMETERS, ANSWER Bt TYPING 

"V. THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPHCS) . 

1. REPORT UNIT NUMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

a, REPORT NUMBER OF BITS TESTED IN DMA AODR TEST - THIS QUESTION 
ASKS WHETHER THE OPERATOR WANTS A PRINTOUT DESCRIBING WHICH 
ADDRESS BITS HAVE BEEN TESTED WHEN THE DMA ADDRESSING TEST 
EXECUTES. 

3. EXTENDED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE "TEST FAILED" 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAU.T IS "NO" I.E. ONL^ 
A MESSAGE REPORTING THE FACT THAT THE TEST FAILED WILL BE 
PRINTED. 

4, NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE - THIS 
QUESTION IS ASKED 0NL1 IF THE PREVIOUS QUESTION WAS ANSWERED 
"YES". THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INDIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPORTS, 
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£»7 EXTENDED P- TABLE DIALOGUE 

WHEN YOU ANSWER THE HARDWARE QUESTIONS. YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABl f- :S TO ANSWER ALL QUESTIONS FOR EACH 
UNIT TO BE TESTED. -' rOU HAVE A MULTIPLEXED DEVICE SUCH AS 
A MASS STORAGE CCNTRC..' -:^ WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL {i\:.j, THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPF ■ ' • lOUS. 

TO ILLUSTRATE A MORE I... FICIENT METHOD. SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE, i ^€ XY 1. SUPPOSE THIS DEVICE CONSISTS Or 
A CONTROL MODULE WITH EIGH. UNITS (SUB-DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS C THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOP MAY BE OR 1. BELOW IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XYll WITH EIGHT UNITS, 

* UNITS CD) ? 8<CR> 

UNIT 1 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 0<CR> 
Q-FACTOR (0) ? KCR^ 

UNIT 2 

CSR ADDRESS CO) ? 160000<CR* 
SUB-DEVICE * CO) ? 1<CR> 
Q-FACTOR (0) I ? 0<CR> 

UNIT 5 

CSR ADDRESS (0) ? 160000<CR* 
SUB-DEVICE * CO) ? 2<CR> 
Q-FACTOR CO) ? <CR> 

UNIT 4 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE (0) ? 5<CR> 
Q-FACTOR (0) ? <CR> 

UNIT 5 

CSR ADDRESS CO) . 160000<CR> 
SUB-DEVICE CO) . 4<CR> 
Q-FACTOR CO) ? <CR> 

UNIT 6 

CSR ADDRESS CO) ? 160000<CR^ 
SUB-DEVICE CO) ? 5<CR> 
Q-KACTOR CO) ? <CR> 

UNIT 7 

CSR ADDRESS CO) ? 160000<CR> 
SUB-OEVICE CO) ? 6<CR> 
Q-FACTOR CO) ? 1<CR> 
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WIJ 8 

CISR ADDRESS CO) 160000<CR> 

S(^-DEVICE l> (0) ? 7<CR> 

QFACTOR (0) 1 ? <CR> 

NOTICE THAT THE DEFAULT VALUE FQR THE Q-FACTOR CHANGES WHEN A 
NON -DEFAULT RESPONSE IS GIVEN, BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 

AS YOU CAN SEE FROM THE ABOVE EXAMPLE. THE HARDWARE PARAMETERS 

DO NOT VAR" SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATURE. 

i> UNITS (0) ? 6<CR> 

UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-OEVICE (0) ? 0,1<CR> 
Q-FACTOR CO) ? 1.,0<CR> 

UNIT 3 

CSR ADDRESS (0> ? 16O00O<CRi 
SUB-OEVICE (0) ? 2-5<CR> 
Q-FACTOR (0) ? 0<CR> 

UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) 7 6,7<CR> 
Q-FACTOR (0) ? 1<CR> 

AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES UILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE CWESTIONS. IN THE FIRST PASS. TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES ANO Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS. FOUR ENTRIES WERt 
BUILT. THIS IS BECAUSE FOUR SUB -DEVICES WERE SPECIFIED. THE 
"-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE. SUB-OEVICES 
2. 5. 4 AND 5 WERE SPECIFIED. (TF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES. THE INCREMENT WOULD BE BY ? SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 ANO RtSPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASii AS 
SHOWN BELOW. 

i> UNITS (0) ? 8^CR> 
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UNIT 1 

CSR ADOREGS (0) ? lbOOOO<CR> 
SUB-OEVICE it CO) ? 0-/<CR> 
Q-FACTOR CO) ? 0. 1 .0. . , , M<CR> 

AS YOU CAN SEE FROM THIS EXAMPLE. NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 



a,e QUICK START-UP PROCEDURE (XXDPf) 
TO START-UP THIS PROGRAM; 

1. BOOT XXDPf 

2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND 50H/ C IF THERt 
IS A CLOCK) QUESTIONS. NOTE. NOT ALL VERSIONS OF XXDP* ASK 
FOR THE CLOCK FREQUENCY 

3. TYPE "R NAME". WHERE NAME lb iHE NAME OF THE BIN OR 
SIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

5. ANSWER THE "CHANGE HW" QUESTION WITH "Y" 

6. ANSWER ALL THE HARDWARE QUESTIONS 

7. ANSWER THE "CHANGE SW" QUESTION WITH "N" 

WHEN YOU FOLLOW THIS PROCED'JRE YOU WILL BE USING ONL> THE 

DEFAULTS FOR FLAQS AND SOFTWARE PARAMETERS. FOR DeFALH_T INFORMATION 

SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS, AND HARDWARE QUESTIONS. 



y^ 
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3.0 ERROR INrORMATION 

3»1 TYPES OF ERROR MESSAGES 

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 
A DIAGNOSTIC; GENERAL. BASIC AND EXTENDFO. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE "lER" FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 

THE GENERAL ERROR MESSAGE IS OF THE FORM; 

NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC:XXXXXX 
ERROF^ MESSAGE 

.WHERE; NAME ■ DIAGNOSTIC NAME 

TYPE • ERROR TYPE (SYS FATAL. DEV FATAL. HARD OR SOFT) 

NUMBER - ERROR NUMBER 

UNIT NUMBER - - N (N IS LAST UNIT IN PTABLE) 

TST NUMBER ■ TEST AND SUBTEST WHERE ERROR OCCURRED 

PC:XXXXXX ■ ADDRESS OF ERROR MESSAGE CALL 

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE "IFR" OR "IBR" FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 
DOCUMENT ) . 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS RfGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED L»JI.FSS THE "lER". "IBR" OR "IXR" FLAGS ARE SET (SEE THE 
FLAGS SrlMON OF THIS DOCUMENT). 

Tii^Su r^* .'^'i^S ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
NESSALc. ANL ANY ASSOCIATED BASIC ERROR MESSAGES. 
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3.2 SPECIFIC ERROR MESSAGES 

THIS PROGRAM IS INTENDED TO PROVIDE A fO/NOGO INDICATION 
or THE FUNCTIONALITY OF THE DHU-!1 BOA.DS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEEU ONLY ANSWER THE 
"EXTENDED ERROR REPORTII^iG" SOFTWARE QUESTION WITH "NO", THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
DOCUMENT. AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING 1 

CZOHX DVC FTL ERR 4409 ON UNIT 00 TST 04 SUB 000 PC: XXXXXX 
DMA ADDRESS TEST FAILED 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED 
DURING THE TEST WHICH TESTS THE DMA .ABORT BIT. 

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR W0L1.D BE REPORTED AS FOLLOWS: 

CZOHX DVC FTL ERR 4409 ON UNIT 00 TST 04 SUB 000 PC; XXXXXX 
DMA ADDRESS TEST FAILED 
BAD BITS BETWEEN BITS AND 15. 



4.0 PERFORMANCE AND PROGRESS REPORTS 

AT THE END OF EACH PASS. THE PASS COUNT IS GIVEN ALONG WITH THF 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OFTEN THE t;ND 
OF PASS MESSAGE IS PRINTED. FOR FuTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENl . 



Id 
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5.0 TEST SUMMARIES 

THE FOLLOWING ARE INCLUDED WITHIN CZDHXA; 

1. DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 

?.. KEYBOARD ECHO TEST ALLOWS THE OPERATOR TO TEST TERMINAL LINKS 
(OR OTHER COMMUNICATIONS LINKS). WHICH ARE ATTACHED TO UUT 
SERIAL PORTS, FROM REMOTE ENDS OF THE LINKS. 

3. MODEM LOOPBACK TEST - ALLOWS THE OPERATOR TO TEST MODEM LINKS 
WHICH ARE ATTACHED TO THE UUT SERIAL PORTS. 

4. DMA ADDR TEST - VERIFIES THAT THE UUT CAN ACCESS THE FULL 
MEMORY WHICH IS ON THE MACHINE VIA DMA ACCESS. 

5. FRAMING ERROR TEST - VERIFIES THAT FORCED FRAMING ERRORS ARE 
REPORTED CORRECTLY. 

6. PARITY ERROR TEST ■ VERIFIES THAT FORCED PARITY ERRORS ARE 
REPORTED CORRECTLY. 

7. DMA MODE TEST - VERIFIES THAT THE UUT WILL TX AND RX DATA 
CORRECTLY USING DMA TRANSMISSION. 

8. SPLIT SPEED TEST - VERIFIES THAT THE UUT WILL FUNCTION 
CORRECTLY USING DIFFERENT TX AND RX SPEEDS ON EACH ACTIVE LINE. 

9. REPORT BMP COOES TEST - THIS PSEUOO TEST REPORTS THE FIRST 5^ 
CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVQIDS INTERRUPTION OF THE 
OTHER TESTS Br THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 



J 2 



DHU-U --VHC TST PART4 MACRO M1200 15-MAR-84 09J48 PAGE 26 qEQ 22 

PROGRAM DOCUMENT 



6.0 EXAMPLE ERROR KREt PASS 

THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 

.R C20HXA0 

CZOHXAO.BIN 

DRS 

CZOHX-A-0 

DHU-11 FUNC TST PART4 

UNIT IS OHU-11 

RESTRT ADOR: 147670 

DR>STA/PAS:1 

CHANGE HW (L) ? Y 

* UNITS CD) ? a 

UNIT 

CSR ADDRESS: CO) 160460 ? fZ 

UNIT 1 

CSR Al>DRES5: (0) 160460 ? 160500 

INTERRUPT VECTOR ADDRESS: CO) 310 ? 320 

ACTIVE LINF BIT MAP: CO) 177777 ? <CR> 

TYPE OF LOOPBACK Ci-INTERNAL. 2-H5029 OR H3277. 3-H325 

4-MODEM. 5-KEYBOARO ECHO); CO) 2 ? 1 

CHANGE SW CD ? Y 

REPORT UNIT NUMBER AS E CH UNIT IS TESTED: (I) Y ? <CR^ 
REPORT NUMBER OF BITS TESTED IN DMA ADOR TEST; CD N ? <CR> 
EXTENDED ERROR REPORTING: CD N ? <CR> 

TESTING UNIT : 

TESTING UNIT i 1 

CZDHX EOP 1 
TOTAL ERRS 

DR> 
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PART4 


PROGRAM 


DOCUMENT 


1016 






1017 






102^ 






1026 






1027 






1028 






1029 






1050 






1031 


000000 




1052 






103? 






1054 






1055 






1036 






1037 




000001 


1058 




000001 


1039 




000001 


1040 




000001 


1041 




000001 


10'^2 






104 3 






1044 






1045 






1046 






104 7 






1046 






1049 


000000 




1050 






1051 




002000 


1052 






1053 


002000 




1054 






1055 






1056 






1057 






1058 






1059 






1060 


002000 




1061 






1078 






1079 


002000 
002000 






002000 


105 




002001 


152 




002002 


104 




002003 


110 




002004 


130 




002005 


000 




002006 


000 




002007 


000 




002010 






002010 


101 




002011 






002011 


060 




002012 






002012 


000000 




0020X4 
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SEQ 23 



.LIST SEQ.LOCBIN.MEB 

.NLIST CND 



.SBTTU PROGRAM HEADER 



.MCALL 

SVC 



SVC 



; INITIALIZE SUPERVISOR MACROS 



t IF STRUCTURED MACROS ARE TO BE USED. ADD ".MCALL STRUCT" AND "STRUCT" 

I TO INITIALIZE THE STRUCTURED MACROS. 

LIST INSTRUCTIONS. SHIFTED RIGHT 
LIST TEST TAGS, SHIFTED RIGHT 
LIST SUBTEST TAGS. SHIFTED RIGHT 
LIST GLOBAL TAGS, SHIFTED RIGHT 
LIST OTHER TAGS. SHIFTED RIGHT 

t CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 

I TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

; SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 

I CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



jVCINS- 




i 


SVCT5T" 




! 


SVCSUB- 




i 


SVCGBL- 




I 


SVCTAG- 




i 



.ENABL ABS 
(.ENABL AMA 



2000 



BGNMOD 



I ♦ • 



J THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
1 THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
i " 

POINTER BGNRPT.BGNSW.BGNSFT.BGNOU.ERRTBL 



HEADER CZDHX.A.O.200,O.PRIO7 



L$NAME: 


J 






.ASCII 


/c/ 




.ASCII 


y ' f 




.ASCII 


/U/ 




.ASCII 


/H/ 




.ASCII 


/x/ 




.BUE 







.B>TE 







.BUE 





L $REV: : 








.ASCII 


•A 


l.iDEPO: 








' .ASCII 





I SUNIT: 








' .WORD 





LJTIMLi 







L2 



UNC TST 


PART4 


MACRO M12 


HFADFR 






002014 


000200 




002016 






002016 


036620 




002020 






002020 


037136 




002022 






002022 


002150 




002024 






002024 


002162 




002026 






002026 


03' 526 




002030 






002030 


000000 




002032 






002032 


000000 




002034 






002034 


000000 




002036 






O0203t) 


000000 




002040 






002040 


002124 




002042 






002042 


000340 




002044 






002044 


000000 




002046 






002046 


000000 




0020^0 






002050 


003 




002051 


003 




002052 






002052 


000000 




002054 


000000 




0020S6 






002056 


000000 




002060 






002060 


005364 




002062 






002062 


027560 




002064 






002064 


000000 




00206b 






002066 


000000 




002070 






002070 


000000 




002072 






002072 


0304 30 




002074 






002074 


000000 




0020 76 






002076 


005374 




002100 






002100 


104035 




002102 






002102 


005314 




002104 






0(;2104 


027S74 
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.WORD 


200 


LJHPCP: 








'.WORD 


LJHARD 


l.$SPCP: 








' . WORD 


LJSOFT 


L$HPTP: 








' .WORD 


L$HW 


l.$5PTP: 








'.WORD 


L$SW 


L$LAOP: 








' .WORD 


LJLAST 


L.JSTA; : 








.WORD 





L$CO: : 








.WORD 





LiDTYP: 


; 






.WORD 





L$APT: : 








.WORD 





L$DTP: : 








.WORD 


LJDISPATCH 


LJPRIO: 








' .WORD 


PRI07 


L.JENVI: 








' .WORD 





L$F.XP1: 








' .WORD 





L$MREV: 








'.BYTE 


CJREVISION 




.BYTE 


CJEDIT 


L$EP: : 








.WORD 







.WORD 





LJSPC: : 








.WORD 





L$DEVP: 








* .WORD 


LSDVTYP 


L$REPP: 








'.WORD 


L$RPT 


l.$EXP4: 








* .WORD 





LJEXPS: 








' . WORD 





L $AUT: : 








.WORD 





L$DUT: : 








.WORD 


L$DU 


L$LUN: : 








.WORD 





LJDESP: 


; 






.WORD 


L $OtSC 


LU OAO; 


; 






EMT 


t SIOAD 


1. JeiP: : 








. WORD 


I $eRRTBL 


L$lCPii 








»WORD 


L$rNU 
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SEQ 25 



1080 



002106 
002106 
002110 
002110 
002112 
002112 
002114 
002114 
002116 
002116 
002120 
002120 



050412 
030410 
027566 
000000 
000000 
000000 



L $CCP: 








.WORD 


L$CLEAN 


L $ACP: 








.WORD 


LSAUTO 


LJPRT: 








.WORD 


L$PROT 


L$TE5T 


• 






.WORD 





LSDLY: 








.WORD 





L$HIME 


; 






.WORD 






N^ 
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1092 




1093 




1094 




1095 




1096 




1097 




1098 




1099 002122 




002122 


000011 


002124 




002124 


030^46 


002126 


031030 


002130 


031272 


002152 


032224 


002154 


033710 


002136 


034324 


002140 


035002 


002142 


035770 


002144 


036536 
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S3TTI. DISPATCH TABLE 



THE DISPATCH TABLE CONTAINS THE SMARTING ADDRESS OF EACH TEST 
IT IS USED BY THE SUPERVISOR TO DIbPATCH TO EACH TEST. 



DISPATCH 9 



.WORD 


9 


L$DISPATCH: : 




.WORD 


Tl 


.WORD 


T2 


.WORD 


T3 


.WORD 


T4 


.WORD 


TS 


.WORD 


r* 


.WORD 


T7 


.WORD 


T8 


.WORD 


T9 



SEQ 26 



1X00 



b 



■}5 



DW-ll FLtNC TST 
DISPATCH TABLE 



1115 
1116 

UK 
1116 

IIH 
1100 

iiJ? 

1104 
llOS 
1136 
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SEQ 27 



no: 

1126 
1129 
1130 
1131 

113: 

1133 



.SBTTL DErAU.T HARDWARE P-TABLE 



THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
THE TEST -DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLI 
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLE5, 
AND IS USED AS A "TEMPLATE" FOR BUILDING THE P-TABLES. 



002146 

002146 000004 

002150 

002150 

002150 160460 
002152 000510 
002154 177777 

002156 002 

002160 
002160 



BGNHW UFPTBL 



LIHW: : 
OFPTBL; 



■WORD U10000-L$HW/2 



.WORD 


lf>0460 


(DEFAULT 


.WORD 


310 


jOEFAULT 


.WORD 


177777 


1 DEFAULT 


.B>TE 


2 


i DEFAULT 


.EVtN 






ENDHW 







CSR ADDRESS 
VECTOR ADDRESS 
ACTIVE LINES BIT 
UOOPBACK MODE 



MAP 



L 10000: 



C3 
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SEQ 28 



1143 
1144 
114S 

1146 
114^ 
1143 
1140 
1150 
1151 
115.-^ 
1155 



1154 
1155 
115b 
1157 
1158 



00^160 
002160 
002162 
002162 

002162 
002164 

002166 
002166 



S8TTL SOFTWARE P- TABLE 



THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED Br THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
SET UP AT ASSEMBLE TIME AND MAY BE VARIED BY THE OPERATOR 
AT RUN TIME. 



000002 



000020 
000000 



8GNSW SFPTDL 



OPTION: 
NDERPTi 



.WORD 
,W0RD 



20 




ENOSW 



.WORD L 10001 -LJSW/S 
L$SW:: 
SFPTBL: : 

iBIT MAP OF PROGRAM CONTROL FLAGS 

jOEFAULT NUMBER OF INDIVIDUAL DATA ERRORS TQ RPT. 



LJOOOl: 



D6 
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^.EQ 29 



lit? 
1168 
1169 
li^<^ 
1180 
1181 
118.^ 
1185 
1184 
1185 
1166 
118^ 
1188 
118^ 
1190 
1191 
ll^J 
11^5 
11^4 
ll<^5 
1196 
1197 
1198 
1199 
1200 
l?,Oi 
1202 
1205 
1204 
1205 
1206 
1207 
1222 



002166 



000020 

177777 



000000 
000002 
000002 
000004 
000006 
000006 
000010 
000012 
000014 
000016 



000020 
000030 
000100 



1 00000 
040000 
020000 
01 0000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
00002C 
000010 
000004 
000002 
000001 

001000 
000400 
00C200 
OOOIOO 



.SBTTl GLOBAL EQUATES SECTION 



1 ♦ • 



i THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
t ARE USED IN MORE THAN ONE TEST. 
I — 



NUMLNS--20 
MAPLNS--177777 



iNUMBER OF LINES ON DHVll IS 
lOIT MAP OF LINES ON DHVll. 



,«ft***4. DEVICE REGISTER OFfSETS FROM THE CSR'S ADDRESS ****** 



CSRO--0 

RBuro--2 

RXTIM0-''2 

LPR0--4 

FSLS0--6 

FDAT0--6 

LNCTR0--10 

TXAD10--12 

TXAD20--14 

TXBFC0--16 



iCSR REGISTER OFFSET FROM THE CSR ADDRESS 

(RECEIVE REGISTER OFFSET FROM THE CSR ADDRESS 

iRECIEVE TIMER REGISTER OFFSET FROM THE CSR ADDRESS 

ILINE PARAHETER REGISTER OFFSET FROM THE CSR ADDRESS 

iFIFOSIZe/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 

iFIFOOATA REGISTER OFFSET FROM THE CSR ADDRESS 

iLINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 

I TRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADDRESS 

(TRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS 

(TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 



,**<.«*« EQUATES USED WITH RESPCCl TO THE RX BUFFER •••♦♦• 

RXBETX--16. (LEVEL OF RX BUFFER AT WHICH TO RE -FNABLF TRANSMISSION, 
RX8DTX--24. (LEVEL OF RX BUFFER AT WHICH TO DISABLE TRANSMISSION. 
RXBFUL--64. (TOTAL CHARACTER CAPACITY OF THE RX BUFFER, 

EQUAl 'j 
( BIT DIFINITIONS 



B1T15 
BIT14 
BIT13 
BIT12 
BITll 
BITIO 
BIT09 
BIT08 
BIT07 
BIT06 
BIT05 
BIT04 
BIT03 
BIT02 
BITCl 
BITOO 



BrT9-- 
BIT8-- 

BIT/-- 
HXT6«% 



100000 

40000 

20000 

10000 

4000 

2000 

1000 

400 

200 

100 

40 

20 

10 

4 

2 

1 

BITO^ 
BITOfl 
BIT07 
0IT06 



E 



:.3 



DHU-ll yVHC TST PART4 
GLOBAL EQUATES SECTION 

000040 
000020 
000010 
000004 
00000^ 
000001 



000040 
000037 
0000 S6 
000055 
000034 



000340 
000300 
000240 
000200 
000140 
000100 
000040 
000000 



000004 
000010 
000020 
000040 
000 I 00 
000200 
000400 
001000 
002000 
004000 
01 0000 
020000 
040000 
100000 
1223 
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SEQ 30 



BIT5- 
0IT4- 
BIT3- 
BIT2- 
BITl- 
BITO- 



BIT05 
BIT04 
BIT03 
B1T02 
BITOl 
BITOO 



J EVENT FLAG DEFINITIONS 

I EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMltNICATION 



EF.START*- 32. 

EF. RESTART-- 31. 

EF. CONTINUE-- 30. 

EF.NEW" 29. 

EF.PWR-- 28» 
t 

i PRIORITY LEVEL DEFINITIONS 

PRI07-- 340 
PRI06-- 300 
PRI05-- 240 
PRI04-- 200 
PRI03-- 140 
PRI02-- 100 
PRI01-- 40 
PRIOO-- 

lOPERATOR FLAG BITS 



START COMMAND WAS ISSUED 
RESTART COMMAND WAS ISSUED 
CONTINUE COMMAND WAS ISSUED 
A NEW PASS HAS BEEN STARTED 
A POWER -FAIL/POWER -UP OCCURRED 



I 

EVL- 
LOT- 
ADR- 
IDU- 
ISR- 
UAM- 
BOt- 
PNT- 
PRI- 
IXE- 
I8E- 
lER- 
LOE- 
H0E« 



4 

10 

20 

40 

100 

200 

400 

1000 

2000 

4000 

10000 

20000 

40000 

lOOOOO 



F6 



DHU-ll rvUC T5T PART4 MACRO Ml^OO 15-MAR-84 09:48 PAGE 29 
GLOBAL eauATES SECTION 



SEQ 31 



l^5^ 






K^?S 






1.^54 






1.^55 






1^56 






l^^57 






1:^58 






1J?9 






l?AO 






l^4l 






1^4^ 






1243 






1^44 






1245 


002166 


000300 


1246 


002170 


000304 


1247 


002172 


00037 7 


1248 


002174 


000 


1249 


002175 


004 


X250 


002176 


000000 


1251 






1252 






125? 






1254 






1255 






1256 


002200 




1257 


002200 


160020 


1258 


002202 


160022 


1259 


002204 


160024 


1260 


002206 


160026 


1261 






1262 


002210 


160030 


1263 


002212 


160032 


1264 


002214 


160034 


1265 


002216 


160036 


1266 






1267 






1268 






1269 






12 70 


002220 


oooooo 


1271 


002222 


oooooo 


1272 


002224 


oooooo 


1273 


002226 


oooooo 


1274 


002230 


oooooo 


1275 


002252 


oooooo 


1276 


002234 


oooooo 


1277 


002236 


031463 


12 78 


002240 


146314 


1279 


002242 


OOOOOO 


1280 


002244 


oooooo 


1281 


002246 


oooooo 


1282 


002250 


oooooo 


1285 


002252 


oooooo 


1284 


002254 


oooooo 


1285 


002256 


oooooo 


1286 


002260 


000001 


128; 


002262 


oooooo 


im^ 


002^64 


oooooo 



.SBTfL GLOBAL DATA SECTION 



J *♦ 



; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
J IN MORE THAN ONE TEST. 



; UNIT VARIBLE AREA 



RXVECA 
TXVECA 
ACTLNS 
LOPBCK 
BRLEVL 
UNITN: 



. WORD 300 

.WORD 304 

.WORD 377 

.BYTE 

.BYTE 4 

.WORD 



t DEVICE REGISTER ADDRESS 
DRADRT: : 



RXTMA: 
FOATA: 



CSRA:t 
RBUTA:: 
LPRA:: 
FSLSA: : 

LNCTRA 
TXAOIA 
TXA02A 

TxarcA 



.WORD 
.WORD 

.wonn 

.WfMJi) 



160020 
160022 
160024 
160026 



.WORD 160030 

. UORD 160032 

. WORD 160034 

.WORD 160036 



iRX VECTOR ADDRESS. 

iTX VECTOR ADDRESS. 

(ACTIVE LINE BIT MAP. 

iLOOPBACK MODE 

(INTERRUPT BUS REQUEST LEVEL 

iUNIT NUMBER. 



TABLE 

iOHU-11 CSR ADDRESS. 

lOHU-ll RECIEVE BUFFER/riMER ADDRESS. 
iOHU-11 LINE PARAMETER REGISTER ADDRESS. 
lDHU-11 FIFO SIZE/LINE STATUS REGISTER ADDRESS, 
lANO FIFO DATA REGISTER ADDRESS. 
lDHU-11 LINE CONTROL REGISTER ADDRESS. 
iOHU-11 TRANSMIT BUFFER I REGISTER ADDRESS 
(OHU-U TRANSMIT BUFFER 2 REGISTER ADDRESS 
iDHU 11 TRANSMIT BUFFER COUNT REGISTER ADDRESS 



ASSORTED GLOBAL 



44** ******* 

VARIABLES: 



*44a44*4***44* 

CTRLCf 

DMTSTA 

FERROR 

FFREMi 

GMANWO 

IBM:: 

lESTAT 

LGRPIM 

LGRP2M 

PASCNT 

PM5FLG 

RXTOUT 

SAVPRI 

SAVTEN 

TP4FcG 

TP4VEC 

TSTNUM 

TXEN6M 

TXINTF 



44****4* 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
■ WORD 



************«*****«*******«****»*««»*«««*«,«»* 

*4*4444*4444444444***********************«************** 

I STORAGE f^OR THE CONTROL -C FLAG. 

iSTO'G FOR DMA TEST ADDRESS (IN P^^R FORM). 

:STORAGE FOR "AT LEAST ONE ERROR*' INDICATOR. 

tSTO'G FOR ADR OF FIRST FREE WORD AF TtR THf DIAG'TIC 

I WORD FOR GMANXX CALL RETURN PARAMETERS. 

(INACTIVE TX/RX BITS MASK. 

(STORAGE FOR STATES OF THE OUT INT ENABLE BITS. 

31463 (BIT MAP OF LINES IN LINE GROUP I. 

146314 (BIT MAP OF LINES IN LINE GRa»P II. 

iSTO'G FOR PASS COUNT USED IN ROM VERSIONO rsi . 

(FLAG INDICATING WHETHER TO PRINT MODEM STATUS. 

(TIME-OUT VALUE FOR WAITING FOR LAST PX CHAR. 

(STO'G FOR PROCESSOR PRIORITY. (TXROFF. TXRON). 

(STORAGE FOR TX. ENABLE STATES. (TXROFF. TXHON). 

(FLAGS SET WHEN AN EXPECTED 004 TRAP OCCL«S. 

(STORAGE roR THE NORMAL 004 TRAP VECTOR. 

1 (STORAGE FOR THE TEST NUMBER. 

(STORAGE FOR TX. ENABLE STATES. CBLtFFER MGM NTt. 

(STORAGE FOR TRANSMIT INTERRltPT FlAuS. 



G3 



DHl' 11 F 
GUOBAl C 


UNC TST PART4 
ATA SFCTION 


1^89 


002266 


000000 


1?90 






1291 






129? 






1295 






1294 


002270 


177546 


1295 


002272 


000500 


1296 


002274 


000100 


1297 


002276 


000074 


1298 


002300 


000000 


1299 


C02302 


000000 


1300 


0023C4 


000170 


1301 


002306 


000170 


1502 


002310 


000021 


1503 


002312 


000062 


1304 






1305 






1306 






1507 






1506 


002314 


177572 


1309 


002316 


172516 


1310 


002320 


000000 


1311 


002322 


000000 


1312 






1313 


002324 




1314 


002324 


172340 


1315 


002326 


172342 


1316 


002330 


172344 


1317 


002332 


172346 


1318 


002334 


172550 


1319 


002356 


172252 


1320 


002340 


172554 


1321 


002342 


172356 


1322 


002344 




1323 






1324 


002344 




1325 


002344 


172500 


1326 


002346 


172302 


1327 


002350 


172304 


1328 


002352 


172306 


1329 


002354 


172310 


1330 


002356 


1:^2312 


1331 


002360 


172314 


1552 


002562 


172316 


1333 


002364 




1334 






1355 






1356 






1337 






1338 


002364 


000001 


1339 


002366 


000002 


1340 


002570 


000004 


1341 


002372 


000010 


1542 


002374 


000020 


1545 


0025 76 


000040 


1344 


002400 


OOCIOO 


X345 


ooaAos 


000200 
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UORDl: : .WORD 



SEQ 32 



(LOCATION FOR PASSING INDIRECT PARAMETERS. 
AND STORAGE. 

^A^^^'ft^^^^A^A^^****************** ************* 

CSR ADDRESS OF THE LTC. 

INTERRUPT PRIORITY LEVEL OF THE I TC. 

INTERRUPT VECTOR ADDRESS OF THE LTC. 

INTERRUPT FREQUENCY OF THE LTC. 

HARDWARE CLOCK COUNTER dl . 

HARDWARE CLOCK COUNTER 02. 

HARDWARE BREAK COUNTER LOCATION. 

BREAK COUNT VALUE IN CLOCK TICKS. 

NUMBER OF MILLI -SECONDS PER LTC TICK. 

LOOP COUNT (USED BY MSLOOP) TO DELAY L MS, 

J MEMMORY MANAGEMENT VARIABLES AND FLAGS. 



;****4i*4i********4i4i*********44***« 


; LINE TIME CLOCK 


VARIABLES 


{44i4i44k4k4t«**4>***4****4>4k*4i*«4i*4'*4i4i* 


CLKCSR: 


: .WORD 


177546 » 


CLKBRL : 


: .WORD 


PR 106 1 


CLKVEC: 


: .WORD 


100 I 


CLKHRZ: 


: .WORD 


60. 1 


TIMERl: 


: . WORD 


; 


TIMER2: 


: .WORD 


1 


TIMER3: 


: . WORD 


120. , 


BCOUNT : 


: . WORD 


120. 1 


MSTICK: 


: .WORD 


17. » 


MSLCNT : 


: .WORD 


62 1 



PARATB: 



PARATE: 
PDRATB; 



PDRATE 



MMSRO: 
MMSR3: 
MMPRES 
MMENAB 



PAROA 
PARiA 
PAR2A 
PAR3A 
PAR4A 
PAR5A 
PAR6A 
PAR7A 



PDROA 
PDRIA 
PDR2A 
PDR3A 
PDR4A 
PDR5A 
PDR6A 
PDR7A 



.WORD 177572 

.WORD 172516 

.WORD 

, WORD 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



172340 
172342 
172344 
172546 
172350 
17255? 
1 72354 
172556 



172500 
172302 
172504 
172306 
172310 
172312 
172314 
172316 



ADDRESS OF MEM MGT STATUS REGISTER 90. 
ADDRESS OF MEM MGT STATUS REGISTER ©5. 
MEM MGT PRESENT FLAG (0 IF MM NOT PRESENT) 
MEM MGT ENABLED FLAG (0 IF MM NOT ENABLED) 

BASE OF MEM MGT PAR ADDRESS TABLE. 



ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
END OF PAR 



MEM MGT 
MEM MGT 
MEM MGT 
MEM MGT 
MEM MGT 
MEM MGT 
MEM MGT 
MEM MGT 
ADDRESS 



PAR *0 
PAR 91 
PAR t>2 
PAR 91 
PAR 9A 
PAR 05 
PAR 06 
PAR 07 
TABLE. 



BASE OF MEM MGT POR ADDRESS TABLE 



ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
ADDRESS OF 
END OF MEM 



MEM MGT POR 00. 
MEM MGT POR 01. 
MEM MGT PDR 9?, 
MEM MGT PDR 03. 
MEM MGT l-DR 04. 
MEM MGT PDR 05. 
MEM MGT PDR 06. 
MEM MGT PDR 07. 
MGT PDR ADDRESS TABLE 



1 



I TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 

BITTBU:; .WORO I jBIT SET 

(BIT I SET 

jBIT 2 SET 

(BIT 5 SET 

jBir 4 SET 

iBIT S StT 

I BIT 6 SET 

iBir V StT, 



.WORD 


2 


.WORD 


4 


.WORD 


10 


.WORD 


20 


.WORD 


40 


.WORD 


100 


tWQRD 


aoo 



QHU 11 FUNC TST PART4 
GLOBAl DATA SECTION 



-13 
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SEQ 33 



1546 


002404 


000400 


1547 


002406 


001000 


1348 


002410 


002000 


1549 


002412 


004000 


1550 


002414 


010000 


1551 


002416 


020000 


1552 


002420 


040000 


1555 


002422 


100000 


1554 






1555 






1556 






1357 






1558 


002424 




1559 


002424 


000062 


1360 


002426 


000115 


1361 


002430 


000156 


1362 


002432 


000206 


1365 


002434 


000226 


1364 


002436 


000454 


1565 


002440 


001130 


1366 


002442 


002260 


1367 


002444 


003410 


1368 


002446 


003720 


1569 


002450 


004540 


1570 


002452 


011300 


1571 


002454 


016040 


1572 


002456 


022600 


1373 


002A60 


045400 


1374 


002^62 


113000 


1375 


002464 




1376 






1377 






1578 






1579 


002464 




1380 


002464 


COOOOO 


1381 


002466 


000000 


1582 


0024 70 


000000 


1385 


0024 72 


000000 


1584 


002474 


000000 


1565 






1386 






1387 






1386 


0024 76 


000000 


1389 


002500 


000000 


1390 


002502 


000000 


1591 


002504 


000000 


1392 


002506 


000000 


1395 






1594 






1595 






1396 


002510 


000000 


1397 


00251? 




1598 


002712 




1 59** 






1400 






1401 






1402 


002/12 


000000 



WORD 
WORD 
WORD 
UORD 
WORD 
UORO 
UORD 
WORD 



400 

1000 

2000 

4000 

10000 

20000 

40000 

100000 



;BIT 8 SET. 

iBIT 9 SET. 

iBIT 10 SET. 

iBIT 11 SET. 

(BIT 12 SET. 

iBIT 13 SET. 

iBIT 14 SET. 

iBIT 15 SET. 



• ******* 

BRTBLB: ; 



TABLE OF OUT BAU0RATF5 



BRTBLE:: 

;♦ 

I ******* 

GPRSOBi: 



.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.WORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 



50. 

75. 

110. 

134. 

150. 

300. 

600. 

1200. 

1600. 

2000. 

2400. 

4600. 

7200. 

9600. 

19200 

38400 



************************ 
GPR SAVE AREAS ZERO AND 

******* ****4iA**4>4>«4>*«**4> 



UORD 
UORD 
UORD 
UORD 
UORD 











******4>*««*4i4>4t**4.4.**L).***************4********** 
*************** *******************4i4t4>4'*4>4>**i<4'** 

iBASE OF OUT BAUD RATE TABLE. 
iBAUO RATE ENTRY FOR CODE 0. 
I BAUD RATE ENTRY FOR CODE 1. 
iBAUO RATE ENTRY FOR CODE 2. 
(BAUD RATE ENTRY FOR CODE 3. 
iBAUO RATE ENTRY FOR CODE 4. 
iBAUO RATE ENTRY FOR CODE 5. 
I BAUD RATE ENTRY FOR CODE 6. 
iBAUO RATE ENTRY FOR CODE 7. 
(BAUD RATE ENTRY FOR CODE 8. 
jBAUO RATE ENTRY FOR CODE 9. 
;BAUO RATE ENTRY FOR CODE 10. 
I BAUD RATE ENTRY FOR CODE 11. 
;BAUO RATE ENTRY FOR CODE 12. 
iBAUO RATE ENTRY FOR CODE 13. 
I BAUD RATE ENTRY FOR CODE 14. 
iBAUD RATE ENTRY FOR CODE 15. 

(LABEL AFTER END OF OUT BAUORATE TABLE. 

******************4***«***********«*«****«***** 

ONE. 

*********************************************** 

I BASE Of GPR SAVE AREA NUMBER ZERO. 

(WORD 1, STORAGE FOR Rl. 

I WORD 2, STORAGE FOR R2. 

iUORO 3, STORAGE FOR R5. 

I WORD 4, STORAGE FOR R4 . 

iUORD 5. STORAGE FOR R5. 



TRANSMISSION AND RECEPTION VARIABLES. POINTERS. AND FLAGS. 

**************4>**4i**4i*4>*4t4****«************«*«********«** ******* *****«*♦* 

.UORD (TOTAL RECEIVED CHARACTER COUNTER. 

("PRINT ERROR SUMMARY" FLAGS. 

(TRANSMISSION DONE FLAGS. 

(RECEPTION DONE FLAGS. 

("TX HAS BEEN DISABLED" FLAG. 



.UORD 
.UORD 
.UORD 
.UORD 



**********«**************************************«*********************^* 



J* 

I ***** 

CHRTOT 
ERSMRF 
TXOONF 
RXOONF 
TXDBLF 
] ***** 

I 

t ***** 

BMP COP 
BMPCQB 
BMPCQE 
I ***** 

;* 

;*•**« 

RXQOPT:: .WORD 



STORAGE AREA FQR THE BMP CODE QUEUE. 



\*******4.*****«*******4i****«********«**************«************«**«**** 



UORD 
BLKU 64 . 



(POINTER USED TO ACCESS VHfc NEXT CELL IN QOi 
(STORAGE FOR 3? CELLS. TEST* PLUS BMP COOL 
(LAST ADDRESS PLUS 2 OF THE BMP CODE QLfL'f 



'**«** 



**««*«*******4**********************************««**«**«««**«* 



****** 



RECEIVE BUFFER AND ASSOCIATED VARIABLES. 



*********4i**4i4i«************««*«*******«**«**««*««*«**««****************«« 



(RX BUFFER OUTPUT POINTER. 



13 



DHU-IL fVUC TST 


PART4 


GLOBAL DATA SECTION 


1403 


002714 


000000 


1404 


002716 


000000 


1405 


002720 




1406 


002720 




1407 


003120 


000000 


1408 






1409 






1410 






1411 


003122 




1412 


003122 


000000 


1413 


003124 


000000 


1414 


005126 


000000 


1415 


003130 


000000 


1416 


003132 


000000 


1417 


003134 


000000 


1416 


003136 


000000 


1419 


003140 


000000 


14c?0 






1421 






1422 






1423 


003142 




1424 


003202 




1425 


003242 




1426 


003302 




1427 


003342 




1428 


003402 




1429 


003442 




1430 


003502 




1431 


003542 




1432 






1433 






1434 






1435 


003602 




1436 


003602 




1437 


004202 




1438 


004402 




1439 


004602 




1440 


004602 




1441 






1442 






1443 






1444 


004642 




1445 


004642 




1446 


004652 




1447 


004662 




1448 


004672 




1449 


004 702 




1450 


004712 




1451 


004 722 




1452 


004 732 




1455 


004 742 




1454 


004 752 




1455 


004 762 




1456 


004 7 72 




1457 


005002 




1458 


005012 




1459 


005U22 
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SEQ 34 



RXBIPT:: .WORD 

RXBCNT: : .WORD 
RXBSTA: : 

.BLKW RXBFU' 

RXBENDi : .WORD 

TX/RX CONTROL 



CBB:; 

CBLPRA: 

CBLNCA: 

CBDPAA: 

CBDPLA; 

CBDPNA: 

CBMAPA: 

CBLPBA: 

CBOFSA: 



. WORD 

.WORD 

. WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 



iRX BUFFER INPUT POINTER. 
I COUNT OF NUMBER OF CHARS IN RX BUFFER. 
(LABEL AT BEGINNING OF THE RX BUFFER. 
I LEAVE ENOUGH ROOM FOR A FULL BUFFER. 
iLABEL AFTER END OF RX BUFFER. 

BLOCK . 

I BASE OF TX/RX CONTROL BLOCK. 

iLINE PARAMETER REGISTER CONTENTS. 

iLINE CONTROL REGISTER CONTENTS. 

(START ADDRESS OF DATA PATTERN. 

(LENGTH OF DATA PATTERN. 

(NUMBER OF REPEAT TRANSMISSIONS OF THE DATA PATTERN. 

iBIT MAP OF LINES TO INITIALISE. 

iLOOPBACK MODE CAS IN LOPBCK). 

lAMOUNT OF OFFSET BETWEEN EACH TX START. 



}**«< 



I* 

t ****** 

DPENOB 

DPLENB 
EXCNTB 
ERCNTB 
TXPTRB 
RXPTR6 
CHCNT8 
TXCNTB 

RXCNTB 

{****>* 

t 

t ****** 

BUFBAS 
ERLTBL 
BUFMID 
BUF3QT 
BUFENO 

ENDETB 
{ ****** 

■ 

} ****** 

DPRSQBi 



TRANSMISSION AND RECEPTION TABLES OF POINTERS AND 

**************** **************************4.**********************4****** 



.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 



16. 
16. 
16. 
16. 
16. 
16. 
16. 
16. 
16. 



(TABLE OF END ADDRESSES OF DATA PATTERNS. 
(TABLE OF LENGTH OF DATA PATTERNS FOR LINES. 
(EXTRA RECEIVED CHARACTER COUNTERS TABLE. 
(CHARACTER RECEIVE ERROR COUNTERS TABLE. 
(TRANSMISSION DATA POINTERS TABLE. 
(RECEPTION DATA POINTERS TABLE. 
(NUMBER OF CHARACTERS TO BE TXED AND RXED. 
(TRANSMISSION CHARACTER COUNTERS TABLE. 
(RECEPTION ':hARACTER COUNTERS TABLE. 



************************************************************************ 

GENERAL TABLE AND BUFFER AREA- -515 WORDS. 

************************************************************************ 

(BASE OF MEMORY BUFFER. 
.BLKW 128. (FIRST HALF OF GENERAL TABLE OR BUFFER. 

.BLKW 64. (SECOND HALF OF GENERAL TABLE OR BUFFER. 

.BLKW 64. (LAST QUARTER OF T^ BUFFER AREA. 

(END OF GENERAL PURPOSE MEMORY BUFFER. 
.BLKW 16. (BUFFER OVERFLOW SPACE, 

*#****************««.************«**«*******«,****************«*********** 

TARLE OF DATA PATTERN RESYNC QUEUES. 

************************************************************************ 

J (DATA PATTERN RESYNC QUEUES TABLE BASE. 

(DATA PATTERN 
(DATA PATTERN 
•DATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
jDATA PATTERN 
(DATA PATTERN 
iDATA PATTERN 
(DATA PATTERN 
(DATA PATTERN 
iOATA PATTERN 



.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


,BLKW 


4 


.BLKW 


4 


.BLKW 


4 


,BLKW 


4 


.BLKW 


4 


.BLKW 


4 


.BLKW 


4 


,BLKW 


4 



RESYNC 


QUEUE 


FOR 


LINE 


0. 


RESYNC 


QUEUE 


FOR 


LINE 


1. 


RESYNC 


QUEUE 


FOR 


LINE 


2. 


RESYNC 


QUEUE 


FOR 


LINE 


3. 


RESYNC 


QUEUE 


FOR 


LINE 


4. 


RESYNC 


QUEUE 


FOR 


LINE 


5. 


RESYNC 


QUEUE 


FOR 


LINE 


6. 


RESYNC 


QUEUE 


FOR 


LINE 


7. 


RESYNC 


QUEUE 


FOR 


LINE 


8. 


RFSYNC 


QUEUE 


FOR 


LINE 


9. 


RESYNC 


QUEUE 


FOR 


LINE 


10. 


RESYNC 


QUEUE 


FOR 


LINK 


U. 


RESYNC 


QUEUE 


FOR 


LINE 


10. 


RESYNC 


QUEUE 


FOR 


LINE 


n. 


RESmC 


QUEUE 


FOR 


LINE 


14, 



DHU-11 TUNC TST PART4 
GLOBAL DATA SECTION 



J3 
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1460 


005032 




1461 


005042 




146^ 






1463 






1464 






1465 


005042 




1466 


005042 


000000 


1467 


005044 


000010 


1468 


005046 


000020 


1469 


005050 


000030 


14 70 


005052 




1471 


005052 




1472 


005052 


000000 


1473 


005054 


073400 


14 74 


005056 


177400 


1475 


005060 




1476 


005060 




1477 


005060 


000000 


14 78 


005062 


000200 


14 79 


005064 




1480 


005064 




1481 


005064 


000000 


1482 


005056 


000040 


1483 


005070 


000140 


1484 


005072 




1485 






1486 






1487 






1488 






1489 






1490 


005072 




1491 


005072 


1564 70 


1492 


005074 


167070 


1493 


005076 


177470 


1494 


005100 




1495 






1496 






1497 






1498 


005100 




1499 


005100 


170070 


1500 


005102 


0074 70 


1501 


005104 


000001 


1502 


005106 


000120 


1503 


005110 


070470 


1504 


005112 


013470 


1505 


005114 


000001 


1506 


005116 


000016 


1507 


005120 


115070 


1508 


005122 


124470 


1509 


005124 


000001 


1510 


005126 


000002 


1511 


005130 




1512 






1513 






1514 






1515 


005150 


000 


1516 


005131 


001 



DPRSQE: 
SCBCTB: 



5CBCTE: 
SCBRTB: 



5CBRTE; 
SCNSTB: 



SCNSTE: 
SCTPTB! 



SCTPTEj 



SINGLE 

' . WORD 
.WORD 
.WORD 
.WORD 



.WORD 
.WORD 
.WORD 



.WORD 
.WORD 



.WORD 
.WORD 
.WORD 



.BLKW 4 J DATA PATTERN RESYNC QUEUE FOR LINE 15. 

lEND OF DATA PATTERN RESYNC QUEUES TABLE. 

CHARACTER MODE LPR FIELD TABLES. 

(BASE OF NUMBER OF BITS PER CHAR FIELDS TABLE. 
i5 BITS/CHAR LPR FIELD. 

10 i6 BITS/ChAR LPR FIELD. 

20 1 7 BITS/CHAR LPR FIELD. 

30 t8 BITS/CHAR LPR FIELD. 

lEND OF NUMBER OF BITS/CHAR FIELDS TABLE. 

iBASE OF flAUORATE FIELDS TABLE. 
(50 BAUD LPR FIELDS. 

73400 il.2K BAUD LPR FIELDS. 

177400 |38.4K BAUD LPR FIELDS. 

I END OF BAUDRATE FIELDS TABLE. 

iBASE OF NUMBER OF STOP BITS FIELDS TABLE. 
tl STOP BIT LPR FIELD. 

200 t2 STOP BITS LPR FIELD. 

;END OF BAUORATE FIELDS TABLE. 

iBASE OF TYPE OF PARITY FIELDS TABLE. 
(NO PARITY LPR FIELD. 

40 jOOO PARITY LPR FIELD. 

140 (EVEN PARITY LPR FIELD. 

lEND OF TYPE OF PARITY FIELDS TABLE. 



DMA MODE LPR FIELD TABLES. 
SET UP WITH SPECIFIED BAUORATES. 1 STOP BIT. ODD PARITY, 8 BITS/CHAR. 

DLPRTB:: »BASE OF DMA TEST LPR FIELDS ^'"^LE. 

.WORD 1564 70 (9.6K BAUD. 

.WORD 167070 il9.2K BAUD. 

.WORD 177470 j3e.4K BAUD. 

DLPRTF:: jcNO OF DMA TEST LPP FIELDS TABLE. 



SPLPRB: 



SPLIT SPEED LPR 

**************** 



PARAMETER TABLE. 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



170070 
7470 
1 

80. 
704 70 
134 70 

16 

115070 

1244 70 

I 

2 



5PLPRE: 



;BASE OF CPLIT SPEED LPR TABLE. 
ilX: 38. 4K, RX: 50 BAUD, 1 STOP 
»TX: 50. RX; 38. 4K BAUD, 1 STOP 
tNUMBER OF REPEAf TRANSMISSIONS 
iNtJMBER OF REPEAT TRANSMISSIONS 
iTX: 1200, RX: 75 BAUD. 1 STOP 
(TX: 75, RX: 1200 BAUD. 1 STOP 
iNUMBER OF REPEAT TRANSMISSIONS 
I NUMBER OF REPEAT TRANSMISSIONS 
|TX: 2000, RX:2400 BAUD. I STOP 
|TX: 2400, RX:2000 BAUD. I STOP 
I NUMBER OF REPEAT TRANSMISSIONS 
iNt^lBER OF REPEAT TRANSMISSIONi; 
jENO OF SPLIT SPEED LPR TABLE. 



000 PAR 8 BITS. 

ODD PAR 8 BITS. 

AT 50 OAUO. 

AT 56. 4K BAUD. 
ODD PAR 8 BITS. 
ODD PAR 8 BITS. 

AT 75 BAUD. 

AT 1200 BAUD. 

ODD PAR 8 BUS. 

ODD PAR 8 BITS. 

AT 2400 BAUD. 

AT 2000 BA\.»0. 



SINGLE CHARACTER DATA PATTERN TABLE. 



'^OPBAS: 



**4'*«** + +**'^«44i.»4>******4>««>«**-»**«*«***********««*«*******«i****4««*i*i*« 



.HrU 
.BYTE 



J START OF SINGLE CHARACTER DATA PATTERN TABLE 



\<6 



DHU-11 FUNC TST 


PART4 


GLOBAL DATA SECTION 


1517 


005132 


010 


1518 


005133 


017 


1519 


005134 


063 


1520 


005135 


074 


1521 


005136 


125 


1522 


005137 


177 


1523 


005140 


200 


1524 


005141 


252 


1525 


005142 


303 


1526 


005143 


314 


1527 


005144 


360 


1528 


005145 


367 


1529 


005146 


376 


1530 


005147 


377 


1531 


005150 




1532 


005150 


000 


1533 


005151 


001 


1534 


005152 


010 


153S 


005153 


017 


1536 






1537 






1538 






1539 






1540 


005154 


125 


1541 


005155 


252 


1542 


005156 


124 


1543 


005157 


253 


1544 


005160 


122 


l'>45 


005161 


255 


1546 


005162 


112 


154 7 


005163 


265 


1548 


005164 


052 


1549 


005165 


325 


1550 


005166 


152 


1551 


005167 


225 


1552 


005170 


132 


1553 


005171 


245 


1554 


005172 


126 


1555 


005173 


251 


1556 


005174 




1557 


005174 


125 


1558 


0O5175 


252 


1559 


005176 


124 


1560 


005177 


253 


1561 


005200 


122 


1562 


005201 


255 


1565 


005202 


112 


1564 


005203 


265 


1565 


005204 


052 


1566 


005205 


325 


1567 


005206 


152 


1568 


005207 


225 


1569 


005210 


132 


3570 


005211 


245 


15 71 


005212 


12f. 


1572 


005213 


251 


1573 
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.BYTE 


10 


.BYTE 


17 


.BYTE 


63 


.BYTE 


74 


.BYTE 


125 


.BYTE 


177 


.BYTE 


200 


.BYTE 


252 


.BYTE 


303 


.BYTE 


314 


.BYTE 


360 


.BYTE 


367 


.BYTE 


376 


.BYTE 


577 


SDPEND: : 




.BYTE 





.BYTE 


1 


.BYTE 


10 


.BYTE 


17 



'^EQ 36 



;ENO or SINGLE CHARACTER DATA PATTERN TABLE 
» START OF FIRST SHORT DATA PATTERN OVERFLOW AREA. 



: SINGLE CHARACTER DATA PATTERN TABLE NUMBER TWO. 



SDP2B: 



SDP2EI 



.BYTE 


125 


.BYTE 


252 


.BYTE 


124 


.BYTE 


253 


.BYTE 


122 


.BYTE 


255 


.BYTE 


112 


.BYTE 


265 


.BYTE 


52 


.BYTE 


325 


.BYTE 


152 


.BYTE 


225 


.BYTE 


132 


.BYTE 


245 


.BYTE 


126 


.BYTE 


251 


.BYTE 


125 


.BYTE 


252 


.BYTE 


124 


.BYTE 


253 


.BYTE 


122 


.BVTE 


255 


.BYTE 


112 


.BYTE 


265 


.BYTE 


52 


.BYTE 


325 


.BYTE 


152 


.fiYTF 


225 


.BYTE 


132 


.BYTE 


245 


.Bi rF 


126 


.BYTE 


25 i 



iSTART OF SECOND SHORT DATA PATTERN. 



iEND OF SECOND SHORT DATA PATTERN. 
I START OF SECOND SHORT DATA PATTERN OVERFLOW AREA, 



^i.^^4^^j^jt.^4.^^4.4,4.t.*^tit^**4^4.4*^t^^* *^^i^^*^*^4^*^*-*^^* ^ ******* *•***. i'i^i.t.i^*. *.*'*■*■**■*■*.* *.***.t^ 4.^^*4. t^ 



L3 



BAL C 


ATA SECTION 


1^74 






1575 






1576 


005214 


372 


1577 


005215 


252 


1578 


005216 


167 


1579 


005217 


143 


1580 


005220 


132 


1581 


005221 


062 


1582 


005222 


036 


1583 


005223 


024 


1564 


005224 


021 


1585 


005225 


020 


1586 


005226 


017 


1587 


005227 


015 


1588 


005230 


014 


1S69 


005231 


014 


l'J90 


005232 


013 


1591 


005233 


012 


1592 






1593 






1594 






1595 






1596 






1597 






1598 






1599 


005234 




1600 


005234 


000000 


1601 


005236 


000002 


160? 


005240 


000004 


1603 


005242 


000006 


1604 


005244 


000010 


1605 


005246 


000012 


1606 


005250 


000014 


1607 


005252 


000016 


1608 


005254 


000020 


1609 


005256 


000022 


1610 


005260 


000024 


1611 


00526? 


000026 


1612 


005264 


000030 


1613 


005266 


000032 


1614 


005270 


00C034 


1615 


005272 


000036 


1616 


005274 




1617 






1618 






1619 






16.^0 






1621 






162? 






1623 






1624 






1625 


005274 




1626 


0052V4 


004 


]o27 


005275 


006 


1628 


005.: 76 


000 


1629 


00527 7 


002 


1630 


005300 


014 
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I SINGLE CHARACTER SAFE PROPORTIONAl. DELAY TABLE. 



PROTBL: 



250. 

170. 

119. 

99. 

90. 

50. 

30. 

20. 

17. 

16. 

15. 

13. 

12. 

12. 

11. 

10. 



t DELAY 
» DELAY 
I DELAY 
lOELAy 
I DELAY 
J DELAY 
iDELAY 
I DELAY 
I DELAY 
t DELAY 
(DELAY 
I DELAY 
t DELAY 
(DELAY 
(DELAY 
(DELAY 



IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 



MILLI 
MILLI 
MILL I 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILLI 
MILL! 



SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECONDS 
SECOW)S 
SECONDS 
SECONDS 
SECONDS 
SECONDS 



AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 
AT 



50 BAUD 
75 BAUD 
110 BAUD 



134 

150 

300 

600 

1200 

1800 

2000 

2400 

4800 

7200 

9600 

19200 



5 BAUD 

BAUD 

BAUD 

BAUD 
BAUD 
BAUD 
BAUD 
BALIO 
BAUD 
BAUD 
BAUD 
BAUD 



38400 BAUD 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTe 
.BYTE 
.9YTE 
.BYTE 
,B.TE 
.BYTE 
.EVEN 

* TABLE FOR STORAGE OF RX/TX LINE NUMBER ASSOCIATIONS. 

* THE ASSOCIATIONS ARE STORED AS LINE NUMBER TxMES 2 FOR USE AS OFFSETS 

* WHEN ACCESSING A TABLE OE WORDS. 

* NOTE: DO NOT WRITE A NON ZERO VALUE INTO THE UPPER BYTE OF ANY ENTRY. 

(BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

(TX/RX LINE OFFSET FOR RX/TX LINE 0. 

(TX/RX 

(TX/RX 

J rx/Rx 

(TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

I TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

(TX/RX 

(END OF 

(GUAI 

i* TABLE OF TX/RX LINE NUMBER ASSOCIATIONS IN STAGGERED LOOPBACK . 

I* THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 

* WHEN ACCESSING A TABLE OF WORDS. 

* THIS IS A TABLf OF DATA FOR READING ONLY. USfc TO LOAD THE ABOVE TABLE. 

* NOTE: MUST CONVERT FROM BYTES TO WORDS WHEN LOADING ABOVE TABLE. 

********************4t******4i****«**«*************4i««*4i«*«i«**4t**«****** •*•***** 



TXRXLB: : 




.WORD 





.WORD 


2. 


.WORD 


4. 


.WORD 


6, 


.WORD 


8. 


.WORD 


10. 


.WORD 


12. 


.WORD 


n. 


.WORD 


16. 


.WORD 


18. 


.WORD 


20. 


.WORD 


22. 


.WORD 


24. 


.WORD 


26. 


.WORD 


28. 


.WORD 


30. 



TXRXLE 



.EVEN 



LINE 


OFFSET 


FOR 


RX/TX 


LINE 


1. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


2. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


3, 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


4. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


5. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


6. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


7. 


LTNE 


OFFSET 


FOR 


RX/TX 


LINE 


8. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


9. 


LINE 


OFFSET 


FOR 


Rx/rx 


LINE 


10. 


LINE. 


OFFSET 


FOR 


RX/TX 


LINE 


11. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


12. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


13. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


14. 


LINE 


OFFSET 


FOR 


RX/TX 


LINE 


15. 


TX/RX LINE 


NUMBER ASSOCIATION TABLE. 


iTtE 


FHAT NEXT TABLE IS ON WORD BOUNDARY 



STGTRB: 



.BYTE 


4 


.BYTE 


6. 


.BYTE 





.BYTE 


2 


.BYTE 


U 



(BASE OF STAGGERED 


TX/RX LINE NUMBER 


(TX/RX LINE OFFSET 


FOR r<X/TX LINE 0. 


1 TX/RX LINE OFFSET 


FOR RX/TX LINE 1. 


(TX/RX LINE OFFSET 


FOR RX/TX LINE 2. 


( TX/RX LINE OFFSET 


FC.'^ RX/TX LINE 3. 


(TX/RX LINE OFFSET 


FOR RX/TX LINE 4. 



TABLE 



M3 



bU. 'om 5§fT?§B^'' "'^^•'° "^^°° 


1631 005301 


016 


1632 005302 


010 


1633 005303 


012 


1634 005304 


C24 


1635 005305 


026 


1636 005306 


020 


1637 005307 


022 


1638 005310 


034 


1639 005311 


036 


1640 005312 


030 


1641 005313 


032 


1642 




1655 005514 




005314 




005314 


000000 


005316 


000000 


005320 


000000 


005322 


000000 


1656 




1657 
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.BYTE 


14. 




iTX/RX LINE 




.BYTE 


8. 




iTX/RX LINE 




BYTE 


10. 




:TX/RX LINE 




.BYTE 


20. 




iTX/RX LINE 




.BYTE 


^2. 




tTX/RX LINE 




.BYTE 


16. 




iTX/RX LINE 




.BYTE 


18. 




[TX/RX LINE 




.BYTE 


28. 




iTX/RX LINE 




.B'iTE 


30. 




I TX/RX LINE 




.BYTE 


24. 




J TX/RX LINE 




.BYTE 


26. 




t TX/RX LINE 




.EVEN 






{GUARANTEE 




ERRTBL 








ERf-tTYP: 




.WORD 







F.RRNBR : 




.WORD 







tRRMSG: 




.WORD 







ERRBLK : 




.WORD 








SEQ 38 



OFFSET FOR RX/TX LINE 5. 
OFFSET FOR RX/TX LINE 6. 
OFFSET FOR RX/TX LINE 7. 
OFFSET FOR RX/TX LINE 8. 
OFFSET FOR RX/TX LINE 9. 
OFFSET FOR RX/TX LINE 10. 
OFFSET FOR RX/TX LINE 11, 
OFFSET FOR RX/TX LINE 12. 
OFFSET FOR RX/TX LINE 13. 
OFFSET FOR RX/TX LINE 14. 
OFFSET FOR RX/TX LINE 15. 
THAT NEXT TABLE IS ON WORD BOUNDARY 

L$ERRTBL: : 



.EVEN 



N3 
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SEQ 39 



1659 
1660 

1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
3 680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 
lb88 
168'> 
1690 
1691 
1692 

1694 
1695 



SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 

* THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 

* GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 



SAVE - MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
SAVE THE GPR CONTENTS FOR LATER RESTORATION. 

PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPRCS) INTACT (NOT RESTORED). 

PREG05 - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 

EaPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 

DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VALUES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOWING STACK FRAME: 

ROUTINE. 



♦ 
* 

* 
* 

♦ 
♦ 

♦ 
♦ 



SP 


- > 


RET 


PC 


INTO PREG05 


SP*2 


- > 


GPR 


RO 


CONTENTS. 


SP*4 


- > 


GPR 


Rl 


CONTENTS. 


SP*6 


- > 


GPR 


R2 


CONTENTS. 


SP*8 


-> 


GPR 


R3 


CONTENTS. 


SPflO 


- > 


GPR 


R4 


CONTENTS. 


SP*12 


-> 


GPR 


R5 


CONTENTS. 


SP*14 


-> 


RET 


PC 


INTO CALLER 



OF SUB'TNE WHICH CALLED PREG05. 



SUB'TNE CALLING USES 6 WORDS OF STACK OVERHEAD. 

USED IN "STRAIGHT LINE CODE" 
IN ANY CASE. AFTER THE 
BE RESTORED TC THE VALUES 



EACH LEVEL OF 

THE SAVE AND PASS MACROS CAN ALSO BE 

TO SAVE AND RESTORE THE GPR VALUES. 

ISSUING OF A PASS CALL THE GPRS WILL 

THEY HAD PRIOR TO THE LAST SAVE CALL (EXCEPT FOR THE EXCEPTED. 

OR PASSED INTACT. GPRS SPrriFIED AS PARAMETERS TO THE PASS CALL) 

AND THE SP WILL ALSO BE RL. fORED TO ITS CONDITION BEFORE THE LAST 

SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 

VALUE WHEN THE PASS MACRO IS CALLED AS IT HAD IMMEDIATELY AFTER 

THE SAVE MACRO WAS CALLED. 



b34 
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SEQ 40 



16^7 




1698 




169^ 




1 '*00 




1^01 




\7o^ 




r:o5 




i:o4 


000056 


i:os 


000016 


1706 


000014 


i?o: 


0000 1 ;> 


1708 


000010 


l\'>9 


000006 


1710 


000004 


1711 


ooooo^ 



.SBTTL GPR FRAME ACCESS EQUATES 

lEQUATES 
lOrrSETS 
I ROUTINE 
I - 



THAT ALLOW ACCESS TO THE STACK FRAME. THESE ARE THF 
INTO THE STACK FOR REGISTERS SAVED DURING THE PREG05 



LPCSLT' 
PCSLOT. 
R5SL0T. 
R4SL0T- 
R5SL0T' 
R^SLOT- 
RISLOT- 
ROSLOT- 



56 

16 

14 

1? 

10 

6 

4 



lOFFSET FOR LAST RETURN PC. 

lOFFSET FOR RETURN PC. 

iOFFSET FOR R5. 

lOfFSET FOR R4. 



iOFKSET 
iOFFSET 
lOFFSET 
(OFFSET 



FOR 
FOR 
FOR 
FOR 



R5. 
R^. 
Rl. 
RO. 



C4 



m^k^ m^o'^lfm^hu ^'^^^^ Hl^O^^^p-MA^-aA OQ.AA page 3^ 



SE.Q 41 



iriJ 
i"rL4 
i;i5 
me 
m/ 

1718 
17n 
17. ?0 

17^1 
172^ 
17^? 
17^4 
17JS 
1 7.>. 
17c>7 
17^8 
17^^ 
1 '50 
1731 
1732 
175? 
1734 
1755 
1736 



.SBTTL GLOBAL MACRO UtflNlTION 



SAVR 



*«* 



THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 
CONTENTS OF THF. GPRS RO THRU R5. 

SP UNCHANGED SINCE SUBROUTINE tJAS ENTERED 

R5SL0T - OFFSET TC STACK SLOT FOR R5 CEQUATED TO 14 OCTAl) 

GPR SAVE AREA ON THE STACK IS LOADED WITK THE CONTENTS OF GPRS 
TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREG05 

SAVE 



* 
* 

♦ INPUTS: 

♦ OUTPUTS; 

♦ CALLING SEQUENCE: 

* 

♦ COMMENTS: NO ARGUMENTS ARE ALLOWED. 

♦ THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 

♦ SUBORDINATE ROUTINES CALLtD: PREG05. 



.MACRO SAVE 
.LIST 

.NLIST 
.ENOM SAVE 



JSR 



R5,PREG05 



iCALL REGISTER SAVE SU8RT, 



D4 



DHU U fUNC TST PrtRT4 


GLOBAL HACRO DEFINITION 


1738 


175*^ 


1740 


1741 


174.^ 


174? 


1744 


1745 


1746 


1747 


1746 


1749 


1750 


1751 


1753 


175? 


1754 


1755 


1756 


1757 


1758 


1759 


1760 


1761 


1762 


1763 


1764 


1765 


1766 


1767 


1768 


1769 


1770 


1771 


1"'73 


1773 


1774 


1775 


17 76 


1777 


1778 


1779 


1780 


1781 


1782 


1783 


1784 


i7e^ 
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SEQ 42 



.SBTTL GLOBAL MACRO DEFINITION - PASS ■ 

THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT iS 
CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 
CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 
RETURNING TO PREG05 TO RESTORE THE GPRS TO THEIR SAVED VALUES. 



INPUTS: 



ONL^ ALLOWED ARGUMENTS APE "RO" THRU "R5". 

ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
SLOT OFFSETS BEFORE CALLING THIS MACRO. 



OUTPUTS: THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 
CALLING SEQUENCE: PASS RO.RI,... 

COMMENTS: ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
FOR EXAMPLE, THE FOLLOWING ARE LEGAL: 

PASS Rl 

PASS R4 RO R2 
THE GPRS LISTED AS*ARGUMENTS WILL BE PASSED INTACT TO THE 
CALLING ROUTINE, ALL OTHER GPRS WILL BE RESTORED. 
THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 

THE MACRO CALL 

PASS RO RS 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE: 

MOV RO,ROSL0T(SP) jPUT RO IN STACK SLOT. 

MOV R5,R3SL0T(SP) |PUT R3 IN STACK SLOT. 

JSR PC,S(SP)» I RE TURN TO PREG05 SU6RT. 

IN THIS EXAMPLE GPRS Rl, R2. R4 , AND R5 WILL BE RESTORED TO 
THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 

SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREG05. VALUE ON STACK.) 



.MACHO 

.IRP 

,IF 

.LIST 

.NLIST 

.ENOC 
.tNOM 
.LIST 

.ui isr 

,ENDM 



PASS M,B.C.D,E,F 

X.<A.B.C.O,t,F'» 

NB.X 



MOV X.X'SLOTCSP) 



JSR PCSCSPn 



jPUT X IN STACK SLOT. 



(RETURN TO PREG05 SUBRT, 



PASS 



E4 



DHU 11 TUNC TST PART-l 
GLOBAL i^UBROUT:NE 



1787 
1798 
178^ 
17'^0 
1791 
179c^ 
1795 
1794 
1795 

179^ 
1797 

1793 
1799 
1900 
1801 
1602 
1805 
1604 
1805 
1806 
1807 
1808 
1809 
1810 
1811 
1812 
1813 
1814 
181S 
1816 
1817 
1318 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1850 
1831 
1852 
1855 
1854 
1855 
1856 
185/ 
1858 
1639 



005524 
005324 
005326 
005350 
005332 
C 05334 
005336 
0053^10 



005346 
005550 
005352 
005554 
005556 
005560 



01044b 
C 10546 
010246 
010146 
010046 
010546 
016605 



00534'! 004V36 



012605 
OlPhOO 
012601 
012602 
012605 
012604 



MACRO M1200 15 -MAR 84 
- PREG05 ■ 
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SEQ 43 



.SBTTL GLOBAL SUBROUTINE - PREG05 - 

PRESERVE REGISTERS RO THROUGH R5 FOR SUBROUTINE CALLS. 

INPUTS: THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE MUST BE IN 
GPR R5. (I.E.- MACROS USE "JSR R5.PREG05".) 

OUTPUTS: REGISTERS RO THROUGH R5 ARE SAVED ON THE STACK, 



CALLING SEQUENCE! 



SAVE (MACRO EXPANSION CALLS PREG05. 

[SUBROUTINE CODE). . . 

PASS (MACRO EXPANSION RhCALLS PREG05, 



000014 



COMMENTS: THIS ROUTINE IS RE-ENTRANT. 

PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE Bl MODIFriNG THE 

REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS, 

f EXAMPLE : MOV VALUE ,ROSLOT( SP ) 1 

MAKE SURE THE SP IS AT IT? ORIGINAL VALUE WHEN YOU 00 THIS. 

SUBORDINATE ROUTINES CALLED: NONE. 

««•* A****** *44>**4i««4t«*4i*«4i*** ******* ***************** ******4*** 4* ***A44**4i«** 

|H5 HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 
(SAVE R4 
(SAVE R3 
(SAVE R2 
I SAVE Rl 
I SAVE RO 

(PUSH RETURN PC ON TOP OF STACK 
(RESTORE R5 TO VALUE IT HAD BEFORE CALLS 

(CALL THE SUBROUTINE AT THE RETURN ADDRESS 
I^ROM THE PREG05 CALL. PUTTING THE PRESENT 
(PC ON THE STACK AS A RETURN ADDRESS INTO 
(THIS (PREG05) ROUTINE. 



PREG05: 


(H5 H 


MOV 


R4,-(SP) 


MOV 


R3, (SP) 


MOV 


R2.-(SP) 


MOV 


Rl.-(SP) 


MOV 


RO. (SP) 


MOV 


R5. (SP) 


MOV 


R5SL0TCSP).R5 


JSR 


PCaCSP)* 



i » ♦ ♦ 

(THE FOLLOWING 
("RETURN" IJSR 
I - 



CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 
PC,aC5P)>l USING THE PC DEPOSITED ON THE STACK ABOVE. 



PR&QRTj; MOV 

MOV 
MOV 
MOV 
MOV 
MOV 



005368 000205 



CSP)..R5 
(SP)» ,R0 
I SP ) » , R 1 
(SP). .R2 
(SP)..R5 
C5P)*,R4 

R5 



(PUT RETURN PC IN R5. 
(RESTORE RO. 
(RESTORc RI. 
(RESTORE R2. 
(RESTORE R5. 
(RESTORE R4, 

(Rt Ti^N ro THE SUBROUTINE WHICH CALLED PREu05» 
tRESrORING R5 IN THE PROCESS, 



4 



DHU-ll TUNC TS1 PAR TO 
GLOBAL TbXT SECTION 
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^F.Q 44 



1841 

1049 
18S0 
1851 
185? 
18SJ 
1654 
IS^'S 
1856 
1857 
18.S8 
1859 
1860 



1861. 
1867 
1868 
1869 
1870 



T4/ 



lh/1 
18"? 
1879 



005564 
005364 

005?^ 1 
005572 



005374 
0053 74 
005374 

00537 7 
00S40? 
OOMCl. 
0054 1 
005413 
005416 

oo54cn 



lo.-r 

000 



no 

061 



125 
061 



104 

055 
04 
116 

veA 

OAO 
000 



110 

061 
106 
103 
123 
120 
134 



125 

061 
125 
040 
124 
101 
064 



.SBTTL GLOBAL TEXT SECTION 



t THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS. 
X MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
; MORE THAN ONE TEST. 

J NAMES OF DEVICES SUPPORTED BY PROGRAM 
I 

DEVTYP <DHU-11> 



LJDVTYP. : 



.ASCIZ /DHU-ll/ 



.EVEN 



TEST DESCRIPTION 
DESCRIPT 



<0HU-11 TUNC TST PART4> 



LtOESC:: 



, ASCIZ /DHU-ll FUNC TST PAR i 



.EVEN 



EVEN 



G4 



DHl' 1 1 
GLOBAi 



wuc 



TST PAKl-3 
SECTION 
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1888 

188^ 

1840 

1891 

18V 

1895 

1894 

1895 

1896 

1897 

1898 

1899 

1900 

1901 

1902 

1903 

1904 

1905 

1906 

1907 

1906 

1909 

1910 

1911 

1912 

1913 

1914 

1915 

1916 

1917 

1918 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

192 7 

1928 

1929 



005420 
0054 70 
005530 
005535 
005567 
005631 
005 725 
005746 
006061 
006157 
006254 
006336 
006410 
00. 37 
006467 
006520 
006544 
006640 
006677 
006736 
007025 
007101 
007141 
007206 
007225 
007306 
0».73ll 
007357 
0074 35 
007535 
007566 
007626 
007 72^ 



EOPfMT 

F-KObO:-; 

EFloOl 

Erihor 

tF440i. 

EF6201 
EF6202 
EF6203 
EF9001 
EF90C2 
tF900:; 
tF9004 
EF900S 
EF'K^ 
EF9007 
EF900h 
EF900f: 
EF90l(j 
EF90i: 

EF90\ " 

EF901''J 
tF9C2f.' 
EF9101 
EF910i 
EF930! 
EF950r 
MFUNir 
MSFMn. 
MSFMT.' 
UBRFMi 



SEQ 45 



»NLIS"! 131N 



J 4«***4.««4^ FORMAT SrAVEMENTS 



IN PRI^4T CALLS ♦♦♦•**»** 



.ASCII 
.ASCI^ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCII 
.ASCIZ 
.ASCIZ 
.AGCTZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCII 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.LVEN 



LOOPBACK TEST STATUS REPORT: 
<WD5*A (D) C0MPLETED.«<N/ 



/ 



/liAMODEM 
/PATTERN 
/i»T#N/ 

/liA *T#A. TEST ABORTED KN/ 
/#A ACTUAL DATA: i<06KA C0).i<N/ 

/*NiiA DMA ADDRESS TEST SUCCESSFUL. BITS TO ^02^f^ CD) TESTED/ 
/ (*D2KA BITS).iiN/ 

\i<A FRAMING/PARITY ERROR DETECTION AND REPORTING BAD ON LINES:*D2*(A 
CHAR RECEIVED WITH FRAMING ERROR BIT #T«A, SHOULD BE KTKN/ 
CHAR RECEIVED WITH PARITY ERROR BIT *T*A, SHOULD BE KTKN/ 
UNEXPECTED *T#A FOUND IN RECEIVE CHAR F1F0:*N/ 
CODE IS ASSOCIATED WITH LINE: «(02*N/ 

CODE tSt K03KN/ 
*Ti<A VALUE: *03#N/ 
<TKA VALUE: NONF^N/ 
i<Ti<A iiD2i^ACD)i*N/ 

CHARACTER RECEIVED WITH ERROR FLAGCS) SET ON LINE *D2*iN/ 
CHARACTER READ AS: M03»N/ 
liTKA ERROR FLAG SET.KN/ 
NUMBER OF ERRORS DETECTED ON LINE 
LINe#02i<A ONLY *Tii05*A BYTES 0FKD5*A 
/ DATA PAT'N TX'O FROM LINEK02KN/ 
/*A DATA PATTERN NOT COMPLETELY 4JUU/ 
#Ti<A fi06KN/ 

TOO FEW TX. ACTIONS GENERATED ON LINE 



/#A 
/KA 
/«A 
/i<A 
/#A 
/KA 
/#A 
/^A 
/|<A 
/Uf\ 
/KA 
/#A 
/liA 



»(D2KN\ 



KD2KA 
BYTE/ 



IS <*D5iiN/ 



f*D2t<N/ 



/liA 

/i<A 

/liU/ 

/KA ERROR CONOiriON ON LINE i<02*N/ 

/MA i«T#D2*A{D"). BMP CODE REPORTED :ii<03#A(0)#N/ 

/liA OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUD-N/ 

/#N*A TESTING I.WIT :#04*N/ 

/MAMOOEM STATUS SIGNAL REPORT :i<N/ 

/*A LINE <M02*A: DSR-iiBlMA, RI-*B1*A, DCD-*B1*A, lTS-*B1*N/ 

/«05KA IS NOT A SUPPORTED BAlWATE , ENTER ANOTHER OR CTRL C.KN/ 

•LIST DIN 



1-14 



GLOBAL T 


UNC TSl pm\A 
rxT SECTION 


MACRO M] 


1^58 








19?^ 




.NLISl f. 


IN 


1940 








1941 








194? 






> «* + *4i4>^ 


1943 








1944 


010020 


BOPMX>; : 


.ASCIZ 


194S 


010047 


ErtOlOi: ; 


.ASCI? 


1946 


010105 


H^5(.>9; : 


.ASCIZ 


1947 


010111 


EM1601; . 


.ASCIZ 


1946 


010174 


fcH440l: : 


.ASCIZ 


1949 


010224 


EM4''*02:: 


.ASCIZ 


1950 


010272 


TM^^O^: r 


.ASCIZ 


1951 


010367 


EMU04: . 


.ASCIZ 


1952 


010426 


erW405: . 


.ASCIZ 


1953 


010522 


tM4406 : . 


.ASCIZ 


1954 


010576 


t^M'»OV: 


.ASCIZ 


1955 


C10660 


Cm40£: : 


.ASCIZ 


1956 


010723 


C. 14409: . 


.ASCIZ 


1957 


010760 


EM44iO: 


.ASCIZ 


1956 


OU007 


EM4411; 


.ASCIZ 


195^ 


01 '054 


EMC 201: 


.ASCIZ 


1960 


106 


Ff)6202; 


.ASCIZ 


l<>t.l 


Onll5 


^.rt63C\: 


.ASCIZ 


1962 


011H6 


tne^*oi : 


.ASCIZ 


1965 


O: M73 


EH-XX)?; 


.ASCIZ 


1964 


0H2?5 


EM9004: 


.ASCIZ 


1965 


0U2i5 


EM9<y.>6 : 


.ASCIZ 


196b 


011306 


Eff^'O/. 


.ASCIZ 


196 7 


011371 


Eh»9'X'e t 


.ASCIZ 


1968 


011452 


t:rt9vX)9 : 


.ASCIZ 


1969 


011476 


fcM<>OxC: 


.ASCIZ 


1970 


0:i522 


EM'-K>il- 


.ASCIZ 


1971 


011532 


EH9012: 


.ASCIZ 


1972 


01.1542 


Eir>oi;'- 


.ASCIZ 


1975 


011551 


E*?901^: 


.ASCIZ 


1974 


0)1645 


Fh^K)15: 


.ASCIZ 


197e. 


0116f.l 


EM9016: 


.ASCIZ 


1976 


Oll^70 


EM9017: 


.ASCII 


1977 


01174S 




.ASCIZ 


i97e 


012001 


EfN025: 


.ASCIZ 


1979 


012075 


e.:t90r>,: 


.ASCIZ 


1980 


012121 


EH902 7 ; 


.ASCIZ 


1981 


01.?201 


EM^>02i,: 


.ASCIZ 


1982 


012260 


Eri9UJ0: 


• .ASCIZ 


1983 


012335 


er^ioi •- 


. ASCIZ 


1984 


012377 


Eft9102: 


.ASCIZ 


1985 


012466 


E.Vn04: 


: .ASCIZ 


1986 


012542 


Ensroi ■ 


: .ASCIZ 


196 7 


012^72 


EM9301 : 


.ASCIZ 


1988 


012651 


crS'SO.': 


.ASCIZ 


1989 


012701 


Eh9505: 


.ASCIZ 


1990 


012 746 


FM^^'.04 : 


.ASCIZ 


1991 


016022 


F-M'»40\; 


.ASCIZ 


199J 


013074 


i\h{ flM,- 


.ASCIZ 


194'> 


0131''..^ 


t> rri T,: 


: .ASCIZ 


1994 


013^:^4 


NU^"^hijG: 


: .ASCII 
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SEQ 46 



. «***4t4>*4i4> GLOBAL ERROR MESSAGES *♦*♦+*♦*+*♦♦ 

/MODEM BAUURATE IN BPS:/ 

/DEVICE REGISTER ACCESS ERRORS/ 

/SET/ 

/TIMEOUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 

/DMA ADDRESS TEST FAILED/ 

/NO SUITABLE ADDR FOUND. TEST ABANDONED/ 

/»*H0ST FAILU«E**|WRITE FAILED TO AN ADDR WHICH HAD BEEN READ/ 

/NO ACTIVE LINES. TEST ABANDONED/ 

/DMA START BIT FOUND SET EEFORE DMA INITIATED. TEST ABANDONED/ 

/TIlie-OUT OCCCURED WAITING FOR DMA TO FINISH/ 

/TOO FEW CHARACTERS FOUND IN THE RXFIFO.OMA FAILED/ 

/TOO MANY BMP COOES FOUND IN RXFIFO/ 

/BAD BITS BETWEEN BITS AND / 

/RXFIFO FAILED TO PURGE/ 

/♦*HOST FAILURE»»WRITE ATTEMPT FAILED/ 

/FRAMING ERROR TEST FAILED/ 

/CLEAR / 

/PARITY ERROR TEST FAILED/ 

/MODEM LOOPBACK TEST / 

/MODEM STATUS CODE/ 

/SELFTEST CODE/ 

/CHARACTER RECEIVED ON INACTIVE LINE. LINE:/ 

/UNEXPECTED CHAR RECEIVED AFTER RX COMPLETE ON LINE/ 

/RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE/ 

/EXPECTED OR CORRECT/ 

/ACTUAL OR MEASURED / 

/OVERRUN/ 

/FRAMING/ 

/PARITY/ 

/SUMMARY REPORTS FUR LINES WITH EXCESSIVE NUMBERS OF ERRORS:/ 

/TRANSMITTED/ 

/RECV'O/ 

/ FIFO WILL NOT PURGE (DATA. VALID STUCK SET^/ 

/ REMAINDER OF TEST SKIPPED./ 

/MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED./ 

/ LPR CONTENTS: / 

/EXTRA CHAR RECEIVED WITHIN DATA PATTERN ON LINE/ 

/Sir«LE CHAR MISSING FROM RECEIVED DATA ON LINE/ 

/*A (NO TX COMPLETION INTERRUPTS RECEIVED)*N/ 

/DMA TRANSMISSION MODE TEST FAILED/ 

/DMA START BIT SET AFTER RESET OR TX. ACTION ON LINE(S);/ 

/ UNEXPECTED DATA FOUND IN FIFO FROM LINE: / 

/SPLIT SPEED TEST FAILED/ 

/BMP COOES WERE REPORTED DURING THIS DIAGNOSTIC/ 

/BMP CODE FOUND IN TEST / 

/THE LAST BMP CODE WAS FOUND IN TEST / 

/UNEXPECTED BMP CODES FOUND DURING THIS PASS/ 

/KEYBOARD ECHO (DHU REMOTE LOOPBACK) TEST / 

/TYPE <CR* WHEN MODEM LINK ESTABLISHED;/ 

/EXIT THE TEST (N - LOOP BACK TQ SENO MORE DATA): ' 

/NUMBER OF 256 BYTE PATTERNS TO SEND ON EACH SLLECTtD LINE/ 



14 

DHU 11 firNC l^JT PART4 MACRO M1200 15-MAR-84 09:48 PAGE 3/-1 SEQ 47 

GLOEJAl TFXT SECTION 

l'^95 01351S .ASCI/ <15><12>/ (1-255. 0-SENO UNTIL tC);/ 

1996 01355^ f^MShbC,;: .A5CIZ /PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTERN;/ 

1997 013437 TERM^jG: : .ASCIZ /TYPE <CR> TO TERMINATE THE TEST:/ 
l^>9y .tVEN 

1999 .LIST BIN 



J 4 
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GLOBAL H XT bfcC 1 -.'M 

i?008 
.?009 
aoiO .SBTTL GLOBAL ERROR REPORT SECTION 

?013 :** 

^013 ; THfc GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

^014 ; USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INEORMATION. PRINTB 

^OlS ( (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

2016 :-- 



I<4 



DHU-11 TUNC TST 


PART4 


MACRO h 


GLOBAL FRROR REPORT INLi 


ROUTINE 


2018 








2019 








20c'^0 








2021 








2022 








2023 








2024 








20:^5 








2026 








202 r 








2028 








2029 








2050 








2051 








2032 








20i3 








2051 








2035 








2056 








2037 








2030 








2059 








2040 








2041 


015500 
013500 






2042 


013500 








013500 


004567 


171620 


2043 








2044 


013504 


012V0O 


000100 


2045 


013510 


046700 


166446 


2046 


013514 


001036 




2047 








2048 








2049 








2050 








2051 


013516 


032705 


000001 


2052 


013522 


001410 




2053 


013524 








013524 


012746 


013616 




013530 


012746 


000001 




013534 


010600 






013536 


104414 






013540 


062706 


000004 


2054 


013544 


032705 


000002 


2055 


013550 


001410 




2053 


013552 








013552 


012746 


013674 




013556 


012746 


000001 




013562 


010600 






015564 


104414 






01356*- 


062706 


000004 


aOb7 


015572 








013572 


012746 


013/53 




013576 


012746 


000001 




013602 


010600 






013604 


104415 






Ol3t)06 


062 706 


000004 



M1200 



15 -MAR -64 09:48 
- EROlOl - 



PAGE 39 



SEQ 49 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - EROlOl - 



1* 

J* 
i* 

* 

I* 
1* 

;* 
i* 
;* 

;* 
i* 

J* 

;♦ 
i* 
I ♦ 



THIS I » AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 
ACCESS TEST). IF THE "EXTENDED ERROR INFO" OPTION HAS BEEN SELECTED 
THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR WRITE OR 
BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP), A MESSAGE INDICATING 
THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED, 



INPUTS; 



OUTPUTS: 



R5 - ERROR FLAG WORD. 

IF BIT IS SET 
IF BIT 1 IS SET 



A READ ERROR OCCURE'" 
A WRITE ERROR OCCUREl.. 



MES 



SAGES 



ARE PRINTED AT THE OPERATOR CONSOLE 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABEL 'EROlOl" AS THE 
PARAMETER IN THE DRS ERROR REPORT 



MESSAGE POINTER 
MACRO CALL. 



i* SUBORDINATE ROUTINES USED: NONE. 



REPORT 



2J! 



4$: 



BGNMSG 


EROlOl 


EROlOl: : 




SAVE 




J SAVE THE GPR CONTENTS. 






JSR 


R5,PREG05 iCALL REGISTER SAVE SUBRT. 


nov 


MIT06.R0 


iSET^UP THE BIT MAP FOR 'REPORT EXT'O 


ERROR INFO* 


BIG 


OPTION. no 


jTRY AND CLEAR THE FLAG. 




RNE 


6J 


:^XIT ir OPTION NOT SELECTED. 




EXTENDED ERROR INKOMATION 




BIT 


*6IT0,R5 


iTtST FOR RtAD ERROR. 




BEQ 


2J 


iSKIP READ ERROR MSG If NO READ ERROR 




PRINTS 


OMSGl 


[PRINT READ ERROR MESSAGE. 








MOV 


W1SG1. tSP) 






MOV 


^1, tSP) 






MOV 


SP . RO 






TRAP 


CJPNTB 






ADD 


«4,5P 


BIT 


ftflITl,R5 


jTFST FOR WRITE ERROR. 




BEQ 


4) 


;Sl<IP WRITE ERROR MSG IF NO WRITC ERROR. 


PRINTS 


0MSG2 


jPRINT WRITE ERROR MESSAGE. 








MOV 


dMSG2. (SP) 






MOV 


«1. tSP) 






MOV 


SP.RO 






TRAP 


C$PNTB 






ADD 


9 A , SP 


PRINTX 


WMSG3 


(SUGGEST THAT DHU MA^ BE AT WRONG ADDRESS. 






MOV 


«MSG^, (SP^ 






MUV 


<n, tsp) 






MOV 


SP . RO 






TRAP 


C5PNTX 






ADD 


<}A , SP 



L4 



DHU-U TUNC TST PART4 MACRO M1200 
GLOBAL. ERROR REPORTING ROUTINE 



.^058 01361? 








013612 


004 736 






2059 013614 








013614 








013614 


104423 






2060 








a061 013616 


045 


101 


102 


013621 


125 


123 


040 


013624 


124 


111 


115 


013627 


105 


055 


117 


013632 


125 


124 


040 


013635 


124 


122 


101 


013640 


120 


040 


103 


013643 


101 


125 


123 


013646 


105 


104 


040 


013651 


102 


131 


040 


013654 


122 


105 


101 


013657 


104 


040 


101 


013662 


124 


124 


105 


013665 


115 


120 


124 


013670 


056 


045 


116 


013673 


000 






2062 013674 


045 


101 


102 


013677 


125 


123 


040 


013702 


124 


HI 


115 


013705 


105 


055 


117 


013710 


125 


124 


040 


013715 


124 


122 


101 


013716 


120 


040 


103 


0l3i'21 


101 


125 


123 


013 '24 


105 


104 


040 


013/27 


102 


131 


040 


013732 


127 


122 


111 


015735 


124 


105 


040 


013740 


101 


124 


124 


013743 


105 


115 


120 


013746 


124 


056 


045 


013751 


116 


000 




2063 013755 


045 


101 


104 


013756 


110 


:.25 


040 


013761 


115 


101 


131 


013764 


040 


102 


105 


013767 


040 


101 


124 


013772 


040 


124 


110 


013775 


105 


040 


127 


014000 


12? 


117 


116 


014003 


107 


040 


125 


014006 


116 


111 


102 


014011 


125 


123 


040 


014014 


101 


104 


104 


014017 


122 


105 


123 


014022 


123 


056 


045 


014025 


116 


045 


116 


014050 


000 






2064 








2065 









l5-MAr-84 09:48 
EROlOl 

6$: PASS 

ENOMSG 



PAGE 39-1 



^EQ 50 



JSR 



iRESTORt THE GPR CONTENTS. 

PC.a(SP)f iRbTURN TO PREG05 SUBRT 



L 10002: 



TRAP 



C$MSG 



MSGl:: .ASCIZ /KABUS TIME-OUT TRAP CAUSED BY READ ATTEMPT. *iN/ 



MSG2:; .ASCIZ ^'i^ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT. i^N/ 



MSG3;: .ASCIZ /«1ADHU MAY BE AT THE WRONG UNIBUS ADDRESS, 9<N*»N/ 



.EVEN 



M4 



SiHU-ll FUNC rST PMRT4 MACRO M1200 
GLOBAL ERROR REPORTING ROUTINE 



15-MAR--84 09:46 PAGE 40 
- ER0503 - 



^EQ 51 



2067 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2085 
2084 
2085 
2086 

2087 
2088 
2089 
2090 
2091 
2092 
2093 



2094 
2095 



014032 
014032 

014032 
014036 
014042 



014044 
014044 
014046 
014052 
014056 
014060 
014062 

014066 
014066 
014066 



012700 
046700 
001011 



010146 
012746 
012746 
010600 
104414 
062706 



104423 



000100 
166120 



005530 
000002 



000006 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER0503 - 

* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 

* MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER. PROVIDED 

* EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 

* INPUTS: Rl - ADDRESS OF THE MESSAGE TO PRINT. 

* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

*. 

* CALLING SEQUENCE: LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

* INCLUDE THE LABEL "ER0503" AS THE MESSAGE POINTER 

* PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL. 

* COMMENTS; THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 

*. 

* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER0503 



ERO503: : 



MOV 
BIC 
BNE 



^IT06.R0 
OPT ION, RO 
2$ 



PRINTS 0EFO503.R1 



TRY TO CLEAR THE 

EXT'O ERROR REPORTING FLAG 

EXIT IF FLAG NOT SET. 



J PRINT THE MESSAGE. 



2$: 



ENDMSG 



MOV 


Rl, -(SP) 


MOV 


*EF0503,-CSP) 


MOV 


#2.-CSP) 


MOV 


SP,R0 


TRAP 


C$PWTB 


ADD 


06, SP 


L 10003: 





TRAP 



CJMSG 



N4 



g 



HU-U FUNC TST PART4 MACRO M1200 
LOBAL ERROR REPORTING ROUTINE 



15-MAR-84 09:48 PAGE 41 
- ER160-$ - 



SEQ 52 



2097 
2098 
2099 

2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
210ti 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 

2120 

2121 
2122 
2123 
2124 
2125 
2126 
2127 



2128 
2129 
2130 



2151 
2132 

c:i53 



014070 
014070 
014070 
014070 

014074 
014100 
014104 



014106 
014106 
014110 
014114 
014120 
014122 
014124 

014130 
014134 
014134 
014136 
014142 
014146 
014150 
014152 

0141^36 
014156 
014160 
014160 
014160 



0, ^700 
0*46700 
001024 



010146 
012746 
012746 
010600 
104414 
062706 

016702 

010246 
012746 
012746 
010600 
104414 
062706 



004 736 



1044c!3 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 



;* 

* 
* 



THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE. ALONG WITH A MESSAGL INFORMING THE OPERATOR WHICH TEST IS 
ABOUT TO BE ABORTED. PROVIDED EXTENDED ERROR INFOMATION HAS BEEN 
REQUESTED, OTHERWISE ONLY A "TEST FAILURE" MESSAGE WILL BE PRINTED. 



INPUTS: 



OUTPUTS 



Rl - CONTAINS THE ADDRESS OF THE MESSAoE TO BE PRINTED. 
ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED, EG DMA, BREAK ETC. 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABLE "ER1603" AS THE MESSAGE POINTER 
PARAMETER IN THE DPS ERROR REPORT MACRO CALL. 



004567 171230 



♦ SUBORDINATE ROUTINES CALLED: NONE. 

BGNMSG ER1603 

ER1603:: 
SAVE I SAVE THE CONTENTS OF THE GPRS. 

JSR R5.PREG05 :CALL REGISTER SAVE SUBRT. 



000100 
166056 



MOV 


<>BIT06.R0 


BIC 


OPT ION, RO 


BNt 


2$ 



»TRY TO CLEAR THE 
lEXT'D ERROR REPORTING 
lEXIT IF FLAG NOT SET. 



FLAG 



PRINTB />EF0503.R1 



J PRINT BASIC MESSAGE ON OPERATORS CONSOLE. 



005530 
000002 



000006 
171164 



005535 
000002 



000006 



MOV f;rhms(;,r2 

PRINTB ftEFl601.R2 



iC.hJ the: "TEST MESSAGE". 
jPRiNT "TEST ABORTED" MESSAGE. 



MOV 


Rl.-(SP) 




K.OV 


1>EF0503, 


-CSP) 


MOV 


<?2. -vSP'* 




MOV 


SP.RO 




TRAP 


C$PNTB 




ADO 


V>6.SP 




MUV 


R2, '(SP) 




MOV 


i>EF1601, 


(SP) 


MOV 


^2. -CSP) 




MOV 


SP.RO 




TRAP 


CJPNro 




ADD 


i>b . SP 





2$: 



PA<;s 
enohsg 



;RtSrORE THt CONTENTS Uf THE UPRS . 



JSR 



pc,acsp)» 



;RhruRN TO PRtG05 SUBRT. 
L 10004: 



TRrtP 



CJMSl, 



b::) 



DMU-U rvUC TST PART4 MACRO M1200 
GLOBAL FRROR REPORTING ROUTINE 



15-MAR 84 09i48 PAGE A?. 
' ER6301 • 



^EQ 53 



^155 








21J6 








^157 








c'138 








?il^ 








3140 








3141 








3143 








314? 








3144 








314*-. 








3146 








3147 








3148 








314Q 








31^0 








31^1 








3 1 S3 








3155 








2154 








3155 








3156 








3157 








3158 








3159 








3160 








3161 








3163 








316? 


014163 
014163 






3164 


014163 








014163 


0O4567 


171136 


3165 








3166 








316^ 








3168 








3169 


014166 


053767 


000100 165766 


3170 


014174 


001507 




3171 








3173 








3173 


014176 


016504 


005234 


3174 


014303 


006305 




3175 


014304 


0O6304 




3176 


014306 








014206 


010446 






014310 


010346 






014313 


012746 


00574t) 




014316 


013746 


000003 




014332 


010600 






014334 


104414 






014336 


062706 


000010 


31/7 








31. '8 








31/'* 








3180 


014333 


013704 


011106 


3181 


014^36 


013/01 


oioios 


3Iti3 


014342 


032705 


000003 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER6201 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 
FRAMING ERROR AND PARITY ERROR TESTS. IT Rr?0RT5 ERROR INFORMATION 
WHEN A CHARACTER HAS BEEN READ FROM THE OUT WITH THE INCORRECT 
COMBINATION OF FRAMING AND PARITY ERROR BITS. THESE ERRORS ARE REPORTrO 
OULY IF EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 



R2 ^ DATA BYTE READ FROM THE OUT. INCLUDING ERROR FLAGS. 

R3 ■ LINE NUMBER MULTIPLIED BY 2. 

R5 MESSAGE FLAGS, WHICH MESSAGES TO REPORT. 

BITl AND BIT3 - INDICATE WHICH MESSAGES ARE TO BE 

REPORTED. FRAMING OR PARITY RESPECTIVELY. 

BITO AND BIT 3 - -SETVCLEAR" MESSAGE FOR 

FRAMING AND PARITY ERRO'>S BITS. 

OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 
CALLING SEQUENCE: 



» INPUTS: 

6 
4 

« 

* 
* 

* 



COMMENTS; 



INCLUDE THE LABEL "ER620r' AS THE MESSAGE POINTER 
PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL. 

THE MESSAGE IS PRINTED ^S BASIC AND EXTENDED ERROR INFORMATION. 
THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD OF THE DUT 
CSR MAY BE ALTERED. 



SUBORDINATE ROUTINES USED: PRTLPR, 



BGNM5G ER6201 
SAVE 



JSR 



iSAVE THE 
R5,PRFG05 



CONTENTS Of 
J CALL 



ER6301: : 
THE GPR ■ S . 
REGISTER SAVE SUBRT 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 
BEQ 



MOV 
ASR 
A5R 
PRINTS 



06IT06, OPTION 
60 i 



(EXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

IDURING THE SOFTWARE QUESTIONS. 



TXRXLB(R3).R4 iGET THE ASSOCIATED TX LINE NUMBEfV. 



R5 
R4 
<>EF6301,R5,R4 



ICALCU.ATE THE 
iCALCiiLATE THE 



RX LINE NUMBER. 
ASSOCIATED LINE NUMBER 



jREPORT THE ERROR TYPE AND LINE 



NUMBERS 


* 


MOV 


R4, (SP) 


MOV 


R3. {SP> 


MOV 


OEFtoJOl, 


MOV 


*5, (SP^ 


MOV 


SP.RO 


TRAP 


CJPNTB 


ADD 


i^lO.SP 



-tSP 



1 'report 



FRAMING ERROR PROBLEM. 

MOV 0EM6303,R4 

MOV «EM050'*,Hl 

BIT 00ITI.R5 



iSEUCT THt ■IR'^OR BIT GUAR' Hf.isAt.i. 

iSKlCT hXPlCTEO 'tHSOR BIT St I - Hf ^SAut- . 

I TEST IF ^RAM^NU ERROR MESSAGE TO Bt RtPURrt.0, 



c:.) 



eraaW fWB6R^s^p66?{aG rBO??He^^^°^ ^^•"'^^Rg^o?'^!^^ ''^^''' 



■I 



SEQ 54 



^185 


014246 


001427 




2184 


014250 


052705 


000001 


*?185 


014254 


001405 




2186 


014256 


010401 




2187 


014260 


012704 


010105 


2188 


014264 








014264 


010146 






014266 


010446 






014270 


012746 


006061 




014274 


012746 


000003 




014300 


010600 






014302 


104415 






014504 


062706 


000010 


218<) 


014310 


052705 


000010 


2190 


014314 


001424 




2191 


014516 


012704 


011106 


2192 


014322 


012701 


010105 


2195 








2194 








2195 








2196 








2197 


014326 


052705 


000004 


2198 


014332 


001405 




2199 


014354 


010401 




2200 


014336 


012704 


010105 


2201 


014342 








014542 


010146 






014344 


010446 






014546 


012746 


006157 




014352 


012746 


00O0L5 




014356 


010600 






014560 


5 04415 






014362 


062706 


000010 


2202 








2?03 


014566 








014566 


010246 






014570 


012746 


00556 7 




014574 


012746 


000002 




014400 


010600 






014402 


104415 






014404 


062706 


000006 


2204 








220b 


014410 


004767 


006152 


2206 


014414 








014414 


004756 




2207 


014416 
014416 








014416 


104423 





2$i 



BEQ 6» 

BIT *eiT0,R5 

BEQ 21 

HOV R4,R1 

MOV *EM0509.R4 

PRINTX *eF6a02.R4,Rl 



(BRANCH TO REPORT PARITY ERROR. 
iTEST "ERROR BIT SET/CLEAR" MESSAGE FLAG. 
(BRANCH TO REPORT ERROR BIT "CLEAR", 
iSELECT EXPECTED "CLEAR" STATE MESSAGE. 
iSELECT THE "ERROR BIT SET" MESSAGE. 
iREPORT THE SOURCE OF THE PROBLEM. 



BIT 


^IT5.R5 


BEQ 


101 


MOV 


OEM6202,R4 


MOV 


«EM0509,R1 



(TEST IF PARITr 
lEXlf IF PARIVY 
iSELECT THE 
(SELECT THE 



ERROR 
ERROR 



MESSAGE 



MOV Rl, (SP) 

MOV R4,-CSP) 

MOV ftEF6202. -(SP) 

MOV 05, (SP) 

MOV SP.RO 

TRAP CIPNTX 

ADO «10.SP 
TO BE REPORTED. 



REPORT TO BE SKIPPED. 
"CLEAR- MESSAGE. 
EXPECTED "SET" STATE MESSAGE. 



( REPORT PARITY ERROR PROBLEM. 
I - 



6(: 



8i; 



10$: 



BIT 


•eiT2,R5 


(TEST "! 


SET' ^ "CLEAR" MESSAGE FLAG. 






BEQ 


81 


(BRANCH 


TO REPORT ERROR BIT CLEAR. 






MOV 


R4,R1 


(SELECT 


THE EXPECTED "CLEAR" STATE MESSAGE. 




MOV 


♦EH0509.R4 


(SELECT 


THE "ERROR BIT SET" MESSAGE. 






PRINTX 


*EF6205.R4,Rl 


(REPORT 


THE SOURCE OF THE PROBLEM. 

MOV 
MOV 


Rl, -(SP) 
R4 , ( SP ) 










MOV 


«F6205, 


(SP) 








MOV 


05 , - ( SP ) 










MOV 


SP.RO 










TRAP 


CIPNTX 










ADD 


010, SP 




PRINTX 


0EF1603.R2 


(REPORT 


ACTUAL DATA RECEIVED^ 

MOV 


R2 . - ( SP ) 










MOV 


♦EF1605, ■ 


■(SP) 








MOV 


02 » (SP) 










MOV 


SP.RO 










TRAP 


CtPNTX 










ADD 


*6,SP 





60$; 



JSR 
PASS 

ENOMSG 



PC.PRTLPR 

JSR 



(REPORT THE CONTENT'j OF ^>^ LPR ^ OR THIS LINE. 

(RESTORt THE CONTENTS QF THE GPRS. 

PC*9(SP)* iRETLiPN TO PREG05 S'..»eRT 



I 10005 1 



TRAP 



CJMtiG 



D5 



DHL! 1 1 
GLOBAL 



FUNC TSI PART4 MACRO H1(?00 15 
tRROR RfcPORTING ROUTINE 



MAR 84 09 J 48 
' FR9001 - 



PAGE 45 



•^F-Q 55 



^^io 

2^14 

r?j:i5 

JC16 

2218 
221^ 
2220 
2221 

2^^^ 

2225 
2224 
2225 
2226 
2227 
2226 
2229 

2250 
2251 
2232 
2235 
2254 
2235 
2236 
2257 
2238 



1259 



2240 



2241 
224^ 



014420 
014420 



014420 
014426 



014450 
014450 
014452 
014436 
014442 
014444 
014446 
014452 
014452 
014454 
014460 
014464 
014466 
014470 
014474 

014474 
014476 
014502 
014506 
014510 
014512 

014^j16 
014516 
014516 



032767 
001433 



010146 
012746 
012746 
010600 
104414 
062706 

010446 
012746 
012746 
010600 
104415 
062706 

010246 
012746 
012746 
010600 
104415 
062706 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9001 - 

!• THIS IS AN FRROR REPORTING SUBRGUTINE WHICH REPORTS AN UNEXPECTED 
t* CODE WHICH MAS BEEN FOUNU IN THE OUT C5R. THIS CODE CAN BE A BMP 
I* CODE. A SELK-TEST CODE. OR A MODEM STATUS CODE. 

J* INPUTS: Rl • ADDRESS OF MESSAGE TO PRINT FIRST. 

I* 02 - SINGLE BYTE CODE WHICH HAS BEEN READ FROM THE OUT, 

I* R4 - LINE NUMBER ASSOCIATED WITH THE CODE. 

t * 

i* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

I* CALLING SEQUENCE: INCLUDE T^€ LABEL "ER9001" AS THE MESSAGE POINTER 
I* PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

»* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR ir^ORMATION. 

I* SLfeORDINATE ROUTINES USED: NONE. 



BGNM5G ER9001 



ER9001: : 



000100 165534 



I EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
t - 



006254 
000002 



000006 



006536 
000002 



000006 



006410 
000002 



000006 



BIT 


06IT06. OPTION 


lEXlT WITH TEST <^AILURE MESSAGE 


IF 






BED 


2i 


(NO EXTENDED ERROR REPORTING HAS BEEN 


REQUESTED 








t DURING THE SOFTWARE Qt.»ESTIONS. 








PRINTS 


0EF9001.R1 


iREPORT TYPE OF CODE FOUND. 


MOV 


Rl.-CSP) 










MOV 


<>EF9001. ■ 


(SP) 








MOV 


02. -(SP) 










MOV 


SP.RO 










TRAP 


CiPNTB 










ADD 


06. SP 




PRINTX 


0EF9002.R4 


(REPORT THE LINE NUMBER OF THE 


CODE. 
MOV 


R4.-(SP) 










MOV 


OEF9002. 


(SP) 








MOV 


02 . ^ C SP ) 










MOV 


SP.RO 










TRAP 


CSPNTX 










ADO 


06. SP 




PRINTX 


tft:h"9005.R2 


1 REPORT THE CODE WHICH WAS FOUND. 












MOV 


R2. CSP) 










MOV 


O^F900^. 


CSP^ 








MOV 


9^. (SP) 










MOV 


SP.RO 










TRAP 


CtPNTX 










ADD 


06, SP 




tNDMSG 




L 10006: 









TRAP 



C$HSo 



EL) 



DHU II ruNC TST P'\RT4 MACRO H1200 
GLOBAL F.RROR REPORTING ROUTINt 
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SEQ 56 



.^.^44 
?.2Ab 
^046 

3^A : 

2J48 

^^49 

2250 

2252 
225? 
2254 
2255 
2256 
225^ 
2258 
225-^ 
2260 
2261 
2262 
2265 
2264 
2265 
2266 

2267 
2266 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 



2278 



2279 
2280 



014520 
014520 



014520 
014526 



014550 
014532 
014536 
014556 
014540 
014542 
014546 
014552 
014554 
014556 
014562 
014562 
014564 
014570 
014574 
014600 
014602 
014604 
014610 
014612 
014614 
014614 
014616 
014622 
014b26 



052767 
001462 



006205 
042702 

010546 
010146 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 
012746 
010600 
104415 
062706 
005704 
100414 

010446 
012746 
012/46 
012746 



S6TTL GLOBAL F.RROR REPORTING ROUTINE - ER9002 - 

THIS IS AN ERROR REPORTING SUeROUTINE WHICH IS INTENDED FOR USE IN THE 
TRANMSISSION AND RECEPTION TESTS. IT REPORTS THE TYPE OF ERROR WHICH 
HAS OCCURRED WHEN INCORRECT DATA IS RECEIVED FROM THE OUT. THIS 
ROUTINE ALSO REPORTS THE READ AND EXPECTED DATA VALUES. 

INPUTS! Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

R2 " DATA BYTE READ FROM THE OUT. 

R3 - LINE NUMBER MULTIPLIED BY 2. 

R4 - EXPECTED DATA BYTE, BIT 15 SET IF "NONE". 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL ■•ER9002" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 



SUBORDINATE ROUTINES USED: PRTLPR. 



BGNMSG ER9002 



ER9002: ; 



I * 



I EXIT IF EXTENOEO ERROR REPORTING HAS NOT BEEN ENABLED 



000100 165434 



177400 



I ■ 



BIT 
BEQ 



ASR 
BIC 
PRINTD 



^IT06, OPTION 
62i 



(EXIT WITH TEST FAILURE MESSAGE IF 

jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 



R5 

«l?7400,R2 

«EF9006,R1,R3 



006520 
000003 



000010 



011476 
0064 5 7 
000005 



000010 



011452 
0064 57 
000003 



PRINTX 



TbT 
BMI 
PRINTX 



(CALCULATE THE LINE NUMBER. 

;MASK OUT ALL BUT DATA IN READ CHAR. 

J PRINT THE FIRST LINE OF THE MESSAGE. 

MOV R3.-(SP 

MOV Rl.-CSP 

MOV 0EF9006 

MOV 05, -(SP 

MOV SP,RO 

TRAP CIPNTB 

ADD «10,SP 

0fcF9OO4,0EM9OlO,R2 jPRINT ACTUAL OATA» 

MOV R2,-CSP 

MOV OE.M9010 

MOV ^F9004 

MOV «5. (SP 

MOV SP.RO 

TRAP C»PNT>. 

AOO 010, SP 

R4 (CHtCK KOR "NONE" CODE SET IN EXPECTED DATA. 

?t (BRANCH TO PRINT -NONE" MESSAGE IF FLAG SF.T. 

0EF9004.0EM9009.R4 (PRINT EXPECTED DATA. 

MOV R4. (SP 

MOV aFM'400'^ 

MOV ot^ 9004 

MOV OS, -CSP 



.-(SP) 
) 



1.5P) 
-(SP) 






K5 



OHU-U ritNC TST PART4 MACRO M1200 
GLOBAL ERROR REPORTING ROUTINE 



15-MAR-64 09:48 
ER9002 - 
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SEQ 57 





014652 


01O600 






014654 


104415 






014656 


062706 


000010 


.?^82 


014642 


000412 




2^63 


014644 








014644 


012746 


011452 




014650 


012746 


006467 




014654 


012746 


000002 




014660 


010600 






014662 


104415 






014664 


062706 


000006 


^284 


014670 


004 767 


005672 


2235 


014674 
014674 








014674 


104423 





2$: 



60$ 
62$ 



BR 
PRINTX 



60 i 
tttF9005,ftEM9009 



MOV SP.RO 
TRAP CJPNTX 
ADD #10, SP 

(EXIT THIS ROUTINE. 

iPRINT MESSAGE INDICATING NO EXPECTED DATA. 



JSR 
ENDMSG 



PC.PRTLPR 



tPRINT CONTENTS OF THE LPR 



MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
REGISTER. 



L10007: 



TRAP 



ftEM9009 . 
*EF9005. 
#2. CSP) 
SP.RO 
CSPNTX 
06. SP 



C$MSG 



-C5P) 



AR 



c 



d5 



DHU-n FUNC TST PART4 MmCRO M1200 
GLOBAL FRROR REPORTING ROUTINE 



2289 

2291 
2292 
229? 
2294 
229^ 
2296 
22'^>'V 
2296 
2299 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 

2310 
2311 
2312 
2315 
2314 
2515 
2316 
2317 
2318 
2319 



15-HAR 84 09:46 
- EP9003 - 



PAGE 4b 



SEQ 58 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9003 - 

THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 
TRANMSISSION AND RECEPTION TESTS. IT REPORTS ERROR INFORMATION WHEN 
A CHARACTER HAS BEEN READ FROM THE DUT WITH AN ERROR FLAG OR FLAGS 
SET (IE. OVER-RUN, FRAMING, OR PARITY FLAG). 

INPUTS; H2 DATA BYTE READ FROM THE OUT, INCLUDING ERROR FLAGS. 
R3 - LINE NUMBER MULTIPLIED BY 2. 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9003" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND fcXTENOED ERROR INFORMATION, 
THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD OF THE OUT 
CSR MAY BE ALTERED. 

SUBORDINATE ROUTINES USED: NONE. 



2320 
2321 
2322 



2323 
2324 
2325 
2326 
2527 
2328 
2329 
2350 



014676 
014676 



014676 
014704 



014706 
014710 
014710 
014 712 
014716 
014 722 
014724 
014 726 
014732 
014/34 
014740 
014740 
014742 
014746 
014752 
014754 
014756 



014762 

014 766 
014772 
014774 



B6NMSG ER9003 



ER9003: 



1 ♦ 

I EXIT 



THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



052767 
001470 



006203 

C10346 
012746 
012746 
010600 
104414 
062706 
010201 
042701 

010146 
012746 
012746 
010600 
104415 
062706 



012701 
032702 
001402 
004 767 



000100 165256 



BIT 
BEQ 



ASR 
PRINTB 



^IT06, OPTION 
62$ 



R3 
ftEF9007»R3 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

I DURING THE SOFTWARE QUESTIONS, 



» CALCULATE THE LINE NUMBER. 
iREPORT fHt ERROR TYPE AND LINE 



006544 
000002 



000006 
177400 



006640 
000002 



000006 



C11S22 
040000 

000036 



MOV 
BIC 
PRINTX 



R2,R1 

0177400, Rl 
0tF9008.Rl 



(EXTRACT THE 

1 PASSED IN CHAR 

(REPORT THE VALUE 



NUMBER. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

FROM 



THE 



RECErVfO JHARACTER 

VAt'Jf. WITH FLAGS. 
OF THE RECEIVED CHAR. 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 



R3. (SP) 
^F9007. -(SP) 
02, "(SP) 
SP,RO 
C*PNTB 
06, SP 



Rl, -CSP> 
«eF9008. -CSP) 
02. -(SP) 
SP.RO 

CSPNTX 
06, SP 



I REPORT OVERRUN FLAG SET IF NECESSARY 



I ■ 



MOV OEM90U.R1 

BIT 08IT14.R2 

BtQ 2i 

JSR PC. 50$ 



(SELECT THE OVERRUN ERROR MESSAGE. 
(CHECK OVERRUN ERROR FLAG IN PASSED IN CHAR. 
(SKIP ERROR IF OVERRUN ERROR FLAG WAS ClfcAR. 
(REPORT THE OVERRUN ERROR FLAG WAS SET. 



D 



)Hy U TUNC TST PART4 MACRO MiaOO 
iUOBAl. FRROR REPORTING ROUTINE 



a553 
2354 
2335 
2336 

2338 
2339 
2340 
2341 
2342 
2343 
2344 
234S 
2346 
254 7 
234W 
2349 



2350 
2351 
2352 
2353 



015000 
015004 
015010 
015012 



015016 
015022 
015026 
015030 
015034 



015036 
015036 
015040 
015044 
015050 
015052 
015054 
015060 

015062 
015066 
015066 
015066 



012701 
0-^2702 
001402 
004767 



012701 
032702 
001415 
004767 
000412 



010146 
012746 
012746 
010600 
104415 
06270b 
000207 



0U532 
020000 

000020 



011542 
010000 

000002 



0066 77 
000002 



000006 



004767 005500 



104423 



15 -MAR 84 09; 48 
- ER9003 ^ 
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SEQ 59 



I REPORT FRAMING FLAG SET IF NECESSARY. 
2$; 



MOV dEM9012.Rl 

BIT *eiT13,R2 

BFQ 4) 

JSH PC, 50$ 



(SELECT THE FRAMING ERROR MESSAGE. 
(CHECK FRAMING ERROR FLAG IN PASSED IN CHAR. 
I SKIP ERROR IF FRAMING ERROR FLAG WAS CLEAR. 
(REPORT THE FRAMING ERROR MESSAGE. 



J REPORT PARITY FLAG SET IF NECESSARY. 
4$: 



MOV ♦EMgoiS.Rl 

BIT «IT12.R2 

BED 601 

JSR PC, 50$ 

BR 60* 



(SELECT THE PARITY ERROR MESSAGE. 

(CHECK PARITY ERROR FLAG IN PASSED IN CHAR. 

(EXIT ROUTINE IF PARITY ERRO FLAG WAS CLEAR. 

(REPORT THE PARITY ERROR MESSAGE. 

(EXIT THIS ROUTINE. 



LOCAL SUBROUTINE TO REPORT AN ERROR FLAG STATUS. 



50$ 



PRINTX OEF9009,R1 



60$ 
62$ 



RTS 

JSR 
ENDMSG 



PC 
PC.PRTLPR 



MOV 


Rl. (SP) 


MOV 


i>EF9009. -CSP) 


MOV 


02 . - ( SP ) 


MOV 


SP.RO 


TRAP 


CiPNTX 


AOO 


06. SP 



J REPORT THE LPR CONTENTS FOR THIS LINE. 

UIOOIO; 

TRAP 



C$MSG 



15 



OHU-U FUNC TST PART4 MACRO Mi200 
GLOBAL ERROR REPORTING ROUTINt 

^55? 
*23b8 
:?359 
2360 
2361 
2362 
2363 
2364 
2365 
2366 
2367 
2368 
2369 
2370 
2371 
2372 
2373 
2374 
257S 



15-HAR-84 09:48 PAGE 46 
- ER9004 - 



SEQ 60 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - KR9004 - 



* 

i* 
I* 

* 
i* 

;* 
i* 
i* 
i* 
I* 
;♦ 



THIS IS AN ERROR REP0RTIf4G SUBROUTINE WHICH REPORTS ERROR SUTIMARIES 
FOR LINES WHICH HAVE EXCEEDED THE SPECiriEO MAXIMUM NUMBER OF 
INDIVIDUAL RECEPTION ERRORS. PROVIDED EXTENDED ERROR REPORTING HAS 
BEEN REQUESTED BY THE OPERATOR. 

INPUTS: Rl ■ ADDRESS OF MESSAGE TO PRINT FIRST. 

ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE, 
ERSMRF ^ "REPORT ERROR SUMMARY FOR LINE" FLAGS. 

OUTPUTS! A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9004" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
THE CONTENTS OF GPR'S R2. R3, R4 . AND R5 ARE DESTROrED. 

SUBORDINATE ROUTINES USED: NONE. 



2377 

2378 
2379 
2380 
2381 



2382 
2383 
2384 
2385 
2386 
2387 
238S 



2389 
2390 
2391 
2392 
JJ393 



015070 
015070 
015070 
015074 
015100 
015102 
015102 
015106 
015112 
015116 
015120 
015122 
015126 
015130 
015134 
015136 
015140 
015142 
015144 
015144 
015150 
015152 
015156 
015162 
015164 
015166 
015172 
015174 
015176 
015200 
015202 
015202 
015202 



012700 
046700 
001040 

012746 
012746 
012746 
010600 
104414 
062706 
005002 
016703 
005004 
000241 
006003 
103013 

016446 
010246 
012746 
012746 
010600 
104415 
062706 
012405 
005202 
005705 
001356 



104423 



000100 
165062 



011551 
005530 
000002 



000006 
165344 



BGNMSG ER9004 

MOV 06IT06.R0 

BIC OPTION, RO 

BNE 6< 

PRINTB 0EFO505 . 0EM9O14 



2t: 



CLR 


R2 


MOV 


ERSMRF, R3 


CLR 


R4 


CLC 




ROR 


R3 


BCC 


4» 


PRINTX 


rtEF90lO,R 



003302 

006736 
000003 



000010 



4$: 



6$: 



ER9004 : : 

I TRY 10 CLEAR THE 

lEXT'D ERROR RE'^ORTING FLAG 

lEXIT IF FLAG NOT SET. 

iREPORT THE SECONDARY ERROR MESSAGE. 

MOV 
KOV 
MOV 
MOV 
TRAP 
ADD 

I CLEAR IHE. LINE COUNTER. 

I GET THE ERROR SUMMARY FLAGS. 

tCLEAR "LINE COUNTER TIMES 2" OFrSET. 

I CLEAR THE CARRY FOR THE FOLLOWING ROTATE. 

; SHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRi . 

iSKlP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 



*EM9014, -(SP5 
^F0503. -(SP) 
02, -(SP) 
SP,RO 
C»PNTB 
#6,SP 



MOV 


(R4)*,R5 


INC 


R2 


TST 


R3 


BNt 


2J 


ENDMSG 





(INCREMENT THE LINE OfFSET B1 2. 

iINCREMT THE LINE COUNTER. 

I CHECK THE ERROR SUMMARI FLAGS. 

(IF MORE FLAGS SET, LOOP TO 00 OTHER LiNt 



MOV 


ERCNT8CR4).-(SP) 


MOV 


R2. (SP) 


MOV 


OEF9010, -CSP) 


MOV 


03, (sn) 


MOV 


5P.ro 


TRAP 


CJPNTX 


ADD 


010, SP 



LlOOll 



TRAP 



CSMSG 



J 5 



DMU-ll ruNC TST PrtRT4 MACRO M1200 
GLOBAL FRROR REPORTING ROUTINE 
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^EQ 61 



^5^5 
2396 
2307 
2398 
2399 
2400 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2400 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 

2419 

2420 
2421 
2422 
2423 
2424 
2425 



2426 

2427 
2428 
2429 
24 30 
2431 
24 32 
2433 



24 34 

24 55 
24 36 
2437 



015204 
015204 
015204 
015204 

OlSdlO 
015214 
015220 

015222 
015222 
015224 
015230 
015234 
015236 
015240 
015244 
01524t> 
015252 



015:?54 
015,^54 
O15260 
015264 
01526(.. 
015270 
015274 
015276 
015^00 
015302 
015502 



004567 170114 



012700 
046700 
001107 



010146 
012746 
012746 
010600 
104414 
062706 
005003 
0??701 
001032 



012746 
012746 
010600 
104415 
062 706 
00024 1 
006002 
103013 

010346 



000100 
164742 



007141 
000002 



000006 
011645 



012260 
000001 



000004 



SQTTL GLOBAL ERROR REPORTING ROUTINE - ER9005 - 



1* 
J* 
t* 
J* 

;* 
1* 
I* 
I* 
;* 
;♦ 
;♦ 

I* 

* 



THIS IS AN ERROR 
TRANSMISSIONS OR 



REPORTING SUBROUTINE 
RECEPTIONS. 



WHICH REPORTS INCOMPLETE DATA 



INPUTS: 



OUTPUTS: 



Rl - EITHER "TRANSMITTED" OR "RECEIVED" TO INDICATE TX 
R2 - BIT MAP OF LINES WHICH DID NOT COMPLETE TX OR RX. 
R4 - ADDRESS OF BASE OF THE CORRECT CHARACTER COUNTERS 
DPLENB - LABEL AT BASE OF DATA PATTERN LENGTH TABLE. 
EM9015 - SYMBOLIC ADDRESS OF THE "TRANSMITTED" MESSAGE 

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



OR RX. 
TABLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9005" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 



* 

;* COMMENTS: 

1* 

J* 

I* SUBORDINATE ROUVINES USED: PRTLPR. 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
THE CONTENTS OF THE INDIRECT ADDRESS FIELD IN THE OUT CSR MAY 
BE ALTERED. 



BGNMSG ER9005 
SAVE 



JSR 



I SAVE THE 
R5.PHEG05 



CONTENTS OF 
tCALL 



ER9005: : 
THE GPR'S. 
REGISTER SAVE SUBRT. 



MOV 
BIC 
BNE 



<^6IT06.R0 
OPTION. RO 
10$ 



PRINTB <?EF9013,R1 



CLR R3 

CMP *fM9015,Rl 

BNE 6 J 



(TRY TO CLEAR THE 

(EXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 

I REPORT THE SECONDARY ERROR MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

(CLEAR THE LINE COUNTER. 

J CHECK IF ADDRESS CORRESPONDS TO TX MESSAGE. 

:BRANCH IF RECEPTION MESSAGE TO BE PRINTED. 



Rl, -(SP) 

0EF9013.-(SP) 

«2.-(SP) 

SP,RO 

CJPNTB 

<?6.SP 



t PERFORM 



TX INCOMPlFTt- ERROR MESSAGE REPORTING. 



PRXNTX V>EM9030 



jPRlNT "NO TX COMPLETION 



2$; 



INTERRUPTS : 
MOV 

MOV 
MOV 
TRAP 
ADD 



IKCEIVEO" 

*tM9030, 
01. CSP) 
SP.RO 
CJPNTX 
04. SP 



CSP) 



CLC 




HOR 


R2 


BCC 


4i 


PRINTX 


#EF9020.R3 



iCLKAR THE CARRY FOR THE FOLLOWING ROTATE. 
(SHIFT "TX NOT DONE" FLAG INTO CARRY. 
(SKIP PRINTING MESSAGt. TF FLAG FOR UNL CLEAR. 
iPRlNT "TOO Ftw TX, ACTIONS GENERATED" MbU. 

MOV R5.-(SP) 



DHU-ll FUNC TST PART4 MACRO M1200 
GLOBAL ERROR REPORTING ROUTINE 



15-MAR-84 09:48 
- ER9005 - 



K5 



PAGE 47-1 



SEQ 62 





015504 


012746 


007225 




015310 


012746 


000002 




015514 


010600 






015516 


104415 






015320 


062706 


000006 


2458 


015524 


004 767 


005236 


2439 


015330 


005203 




2440 


015332 


005702 




2441 


015354 


001357 




2442 


015336 


000440 




244 J 








2444 








244b 








2446 


015340 


000241 




2447 


015542 


006002 




2448 


015544 


103051 




2449 


015346 


006303 




2450 


015350 


016305 


005234 


2451 


015354 


010246 




2452 


015356 


010502 




2453 


015360 


016505 


003442 


2454 


015364 


006202 




2455 


015566 


006203 




2456 


015370 








015370 


010246 






015372 


010546 






015374 


011446 






015376 


010146 






015400 


010346 






015402 


012746 


007025 




01540^^ 


012746 


000006 




015412 


010600 






015414 


104415 






015416 


062706 


000016 


2457 


015422 


012602 




2458 


015424 


004767 


005136 


2459 


015430 


005724 




;M60 


015432 


005203 




2461 


015434 


005702 




2462 


0154 36 


001540 




2465 


015440 








015440 


004 736 




2464 


015442 
015442 








015442 


104423 





MOV 


#Er9020. -CSP) 


MOV 


fl2»-CSP) 


MOV 


SP.RO 


TRAP 


C$PNTX 


ADD 


06, SP 



JSR 


PC.PRTLPR 


4$: INC 


R3 


TST 


R2 


nNE 


21 


BR 


10$ 


1 PERFORM RX INCOMPLETE ERROR 


6$t CLC 




ROR 


R2 


BCC 


Bi 


ASL 


R3 


MOV 


TXRXLB(R3),R5 


MOV 


R2,-CSP) 


MOV 


R5.R2 


MOV 


CHCNTBCR5),R5 


ASR 


R2 


ASR 


R3 


PRINTX 


#EF9012.R3,R1 



8$: 



lOli 



MOV 


(SP)..R2 


vJSR 


PC.PRTLPR 


TST 


(R4)^ 


INC 


R3 


TST 


R2 


BNE 


t>t 


PASS 





ENOMSG 



JSR 



iRtPORT CONTENTS OF LPR REGISTER FOR THIS LINE. 

(INCREMENT LINE COUNTER. 

I CHECK THE "TX NOT DONE FLAGS". 

ilf MORE FLAGS SET, LOOP TO DO OTHER LINES. 

lEXIT THIS ROUTINE. 



I CLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
I SHIFT "RX NOT DONE" FLAG INTO CARRY. 
ISKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
(SHIFT LINE P TO GIVE CORRECT TABLE OFFSET. 
iGET THE "ASSOCIATED" RECEIVE LINE OFFSET. 
I SAVE THE "RX NOT DONE" i LAGS ON THE STACK. 
iCOPY THE ASSOCIATED TX LINE OFFSET. 
iGET THE TOTAL NOMOER OF EXPECTED CHARS. 
(SHIFT THE TABLE OFFSET TO GIVE A LINE NUMBER, 
i SHIFT TABLE OFFSET TO GIVE LINE NUMBER, 
.CR4).R5,R2 jREPORT NUMBER OF CHARS ON LINE. 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 
(RESTORb THE "RX NOT DONE" FLAGS. 
(REPORT CONTENTS OF I PR REGISTER FOR THIS LINE. 
(INCREMENT THE CHARACTER COUNTER TABLE. 
(INCREMENT THE LINE COUNTER. 
(CHECK THE "RX NOT DONE FLAGS". 
(IF MORE FLAGS SET. LOOP TO DO OTHER LINES. 
(RESTORE THE CONTENTS OF THE GPRS. 
PC.3CSP)* (RETURN TO PREG05 SURRT. 



R2.-(SP) 

R5,-CSP) 

(R4),-(SP) 

Rl.-(SP) 

R3, (SP) 

*EF9012. -CSP) 

*6 . - ( SP ) 

SP.RO 

CiPNTX 

*16.SP 



L10012: 



TRAP 



CJMSG 



L5 



DHUll TUNC TST PART4 MACRO M1200 
GLOBAL F.RROR REPORTING ROUTINE 



?A6b 
?Ab7 

?4t>9 

?4;o 

2471 

24 73 
24 74 
24/5 
24 76 
2477 
24 7ft 
2479 
2480 
2461 
2482 
2483 
2484 
2485 



2486 
2487 
2488 
2489 
2490 
2491 
2492 



249 5 
2494 



015444 

015444 

015444 
015450 
015454 



015456 
015456 
015460 
015462 
015466 
015472 
015474 
015476 

015502 
015502 
015502 



012700 
046700 
001012 



010146 
010246 
012746 
012746 
010600 
104414 
062706 



104423 



000100 
164506 



00C.520 
000003 



000010 



15-MAR-84 09:48 PAGE 48 
- ER9101 - 



^.EQ 63 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 

I* THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 

;* WHICH TAKES A SINGLE. 2 DIGIT DECIMAL ARGUMENT AFTER THE END OF AN 

i* ASCII MESSAGE. 

i* 

i* INPUTS: Rl - VALUE TO BE PRINTED AFTER MSb AS 2 DECIMAL DIGITS. 

I* R2 " ADDRESS OF MESSAGE TO PRINT FIRST. 

J* 

t* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

;♦ 

i* CALLING SEQUENCE: INCLUDE THE LABEL "ER9101" AS THE MESSAGE POINTER 

:♦ 



PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 



:♦ COMMENTS: 

!♦ SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9101 



ER9101:! 



MOV 
BIC 
BNE 



*eiT06.R0 
OPTION. RO 
2i 



jTRY TO CLEAR THE 

jEXT'O ERROR REPORTING FLAG 

jEXIT IF FLAG NOT SET, 



PRINTS #EF9006.R2.R1 iREPORT THE STRING FOLLOWED BY THE NUMBER. 



2$; 



ENDMSG 



MOV 


Rl. -^CSP) 


MOV 


R2. -CSP) 


MOV 


*EF9006. -CSP) 


MOV 


*3. -CSP) 


MCV 


SP.RO 


TRAP 


CJPNTB 


ADD 


#10, SP 


L10013: 





TRAP 



C$MSG 



MP3 



GLOBAL FRROR REPORTING ROUTINE 



PART4 MACRO M1200 



15.MAR-84 09:48 PAGE 49 
- ER9102 - 



SEQ 64 



2496 
2497 
2498 
2499 
2500 
2501 
2502 
2505 
2504 
2505 
2506 
2507 
2508 
250^) 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 
2522 
2523 
2524 

2525 

2526 
2527 
2528 
2529 
2550 
2551 
2532 
2553 



SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER9102 



2534 
2555 
2556 
2537 
2536 



015504 
015504 
015504 
015504 



015510 
015516 



015520 
015520 
015522 
015526 
C15552 
015554 
015556 
015542 
015544 
015546 
015550 
015552 
015552 
015554 
015560 
015564 
015566 
015570 



010146 
012746 
012746 
010600 
104414 
062706 
005003 
000241 
006002 
105011 

010546 
012746 
012746 
010600 
104414 
062706 



*■ 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AODITIONAl ERROR 
INFORMATION AFTER THE ERROR MESSAGE HEADER, PROVIDED EXTENDED ERROR 
REPORTING HAS BEEN REQUESTED. 

THIS ROUTINE IS PASSED A BIT MAP WHICH SPECIFIES THE LINES FOR WHICH 
THE ERROR CONDITION SHOULD BE REPORTED. 



Rl - ADDRESS OF THE MESSAGE TO BE PRINTED BY THIS ROUTINE. 
R2 - BIT MAP OF LINES FOR WHICH TO REPORT ERRORS. 

MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 

LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

LOAD THE BIT MAP OF LINES WITH ERRORS IN R2. 

INCLUDE THE LABEL "ER9102" AS THE MESSAGE POINTER 

(ERRBLK) IN THE 0IA6 SUPER ERROR REPORT MACRO CALL. 

THE OUTPUT FOR^Al OF THIS MESSAGE IS: 
"TEXT MESSAGE POINTED TO BY Rl" 

"ERROR CONDITION ON LINE NN" 

"ERROR CONDITION ON LINE . . . " 
THE TOP MESSAGE. AND THE MESSAGE FOR EACH LINE ARE PRINTED 
AS BASIC ERROR INFORMATION. 



* INPUTS: 

* 

* OUTPUTS: 

* 

* CALLING SEQUENCE: 

* 

* COMMENTS: 

4l 

*■ 
♦ 

* SUBORDINATE ROUTINES USED: NONE. 

4t4i*4.4i4i*4**4i4i«4L****4*«4t4i4i4>4i4>4i*4i«4>4i**4'* + 4>4i4i4t«*4i4t*4(4>4k4>4>**4L4>4>***4i*<>4i4i<k4i4i4i4t4i«4t4i4i4L*i 



004567 167614 



052767 000100 164444 
001441 



BGNMSG ER9102 
SAVE 



JSR 



ER9102: ; 
iSAVE THE CONTENTS OF THE GPRS. 
R5.PREG05 ;CALL REGISTER SAVE SUBRT. 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT <«IT06, OPTION 
BEQ 60$ 



lEXIT WITH TEST FAILURE MESSAGE IF 

;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

jDURING THE SOFTWARE QUESTIONS. 



005550 
000002 



000006 



2$: 



007511 
000002 



000006 



PRINTB 


0EF0503.R1 


iPRINT THE FIRST LINE OF THE MES5A(iF . 

MOV 


Rl. (SP) 








MOV 


*EF05O3. 


CSP) 






MOV 


02, (SP) 








MOV 


SP,RO 








TRAP 


CJPNTB 








ADO 


*6.SP 




CLR 


R5 


tCLEAR THt LINE NUf«ER. 






CLC 




iPREPARE TO ROTATE NEXT BIT OUT OF MAP. 






RQR 


R2 


iGET THE NEXT BIT OF IH£ BIT MAP. 






BCC 


4$ 


iSKIP PRINTING MESSAGE IF THE BIT IS CLEAR. 




PRINTB 


#EF9103,R3 


I REPORT THIS LINE HAD THE ERROR, 

MOV 


R5. I.SP) 








MOV 


^>r.F9l05. 


(Sp:) 






MOV 


* J , ( SP ) 








MOV 


SP,RO 








TRAP 


C$PNTB 








ADD 


^6,SP 





DHU-ll ruNC TST PART4 

GLOBAl ERROR REPORTING ROUTINE 



MACRO M1200 



15-MAR-84 09:48 
- ER9102 - 



N5 



PAGE 49-1 



SEQ 65 



^539 015574 
2540 015576 
25<1 015600 

2542 015602 
015602 
015606 
015612 
015614 
015616 

2543 015622 
015622 

2544 015624 
015624 
015624 



005203 
005702 
001361 

012746 007306 

012746 000001 

010600 

104414 

062706 000004 

004736 



104423 



4$: 



INC R3 

rST R2 

BNE 2i 

PRINTS VJEF9101 



Cf\t . 



PASS 
ENDMSG 



JSR 



(INCREMENT THE LINE COUNTER. 

(CHECK THE BIT HAP. 

(LOOP IF NOT ALL SET BITS REMOVED FROM BIT MAP 

(PRINT A BLANK LINE. 

MOV 

MOV 

MOV 

TRAP 

ADO 

(RESTORE THE SAVED CONTENTS OF THE GPRS. 
PC.q)(SP)* (RETURN TO PREG05 SUBRT. 



*EF9101, -CSP) 
#1. CSP) 

SP.RO 

CiPNTB 

ff4.SP 



L10014: 



TRAP 



C$MSG 



Be^ 



D W - 1 1 
GLOBAL 

254? 

2550 
2551 

255-^ 
2554 
2555 
2556 
255/ 
2558 
255^ 
2560 
2561 
2562 
2565 
2564 
2565 
2566 
2567 

2568 

2569 

2570 
2571 
2572 
2575 
2574 



Flt^C TST PART 4 MACRO Ml 200 
FRROR REPORTING ROUTINE 



15 -MAR 84 09i48 
- tR9501 - 



PAGt 50 



^EQ 66 



2575 
2576 
2577 
2578 
25 79 
2580 
2581 
2582 
2585 
2584 
2585 
2586 
2587 
2588 
2589 
2590 
2591 
2592 
259 5 
2594 



015626 
015626 
015626 
015626 

015652 
015656 

015642 

015644 
015644 
015646 
015652 
015656 
01 5660 
015662 
015666 
015672 
01S676 
015700 
015702 
015706 
015710 



015712 
015716 
015720 
015724 
015726 
015750 
015/32 



012700 
046700 
001064 



010146 
012746 
012746 
010600 
104414 
062706 
012705 
012705 
012501 
012504 
004 767 
020502 
103772 



02022 7 
001056 
005 762 
001455 
012501 
011504 
012705 



.S8TTL GLOBAL ERROR REPORTING ROUTINE 



- ER9301 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP COOES 
THAT ARE FOUND IN THE BMP CODE QUEUE. TOGETHER WITH THE THE NUMBER 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 

INPUTS: Rl - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
R2 - THE ADDRtSS OF THE NEXT EMPTY CELL IN THE QUEUE. 

OUTPUTS: THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT 
OPERATOR CONSOLE. 



OF 



THE 



CALLING SEQUENCE: 



INCLUDE THE LABEL ''ER950r' AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPFR ERROR REPORT MACRO CALl 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
SUBORDINATE ROUTINES USED: NONE. 



004567 167472 



BGNMSG ER9501 
SAVE 



J5R 



000 I 00 
164520 



005550 
000002 



000006 
002512 
012651 



000056 



MOV 
BIC 
BNE 



♦61106. RO 
OPTION. RO 
601 



PRXNTB OEFOSOS.Rl 



2*1 



MOV 


♦6MPCQ6.R5 


MOV 


♦EM9502.R5 


MOV 


(R5)».Rl 


MOV 


(R5)».R4 


JSR 


PC. 501 


CMP 


H5,R2 


BLO 


2$ 



ER9501: : 
jSAVE THE GPRS ON THE STACK. 
R5.PREG05 iCALL REGISTER SAVE SUBRT, 

I'.RY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 

iRtPORT UNEXPECTED BMP COOES FOUND. 

MOV Rl.-(SP) 

MOV OEF0505. -(SPI 

MOV 02, -(SP) 

MOV SP.RO 

TRAP CtPNTB 

ADD 9h , SP 

OF THE BMP CODE QUEUE. 

REPORTED. 

TEST THAT WAS EXECUTING. 

REPORTED Off THE QUEUE. 



iGET 
iGET 
iGET 
iGET 



THE 
THE 
THE 
BMP 



START ADDRESS 

MESSAGE TO BE 

NUMBER OF THE 

CODE THAT WAS 
iGO REPORT THE BMP CODE. 
iCHECK IF ALL CODES HAVE BEEN REPORTED. 
lIF IT IS NOT THE LAST BMP CODE THEN LOOP 



002 706 
000002 



012/01 



CHECK IF OVERFIOW HAS OCCURRED. 
THE CONDITIONS f OR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS Of THt 
LAST CELL IN THE. QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
CELL* 



CMP 


R2,*6MPCQE-4 


BN( 


601 


TST 


aCf^^) 


BtQ 


60» 


MOV 


(R5)».ni 


MOV 


(R5),R4 


MOV 


fltM9505,R5 



iCHfCK IF THE POINTER IS 
lEXIT IF NOT AT THE LAST 
(CHECK FOR A BMP CODE IN 
jEXIT IF NO OVERFLOW HAS 
iGET THE TEST NUMBER Of F 
iGt T THE BMP CODE Of} THE 



AT THE LAST LOCATION 
LOCATION. 
THE LAST CELl 
OCCURE'J. CELL fcNPTI , 
THE QLf L* . 

Quetf . 



ISELLCT THE MEiJSAGE TO BE RbPORTtO* 



Cb 



msk' im^'^^pmrno RBfl9?Ht"^^-°" 



15 MA 



iR^io? 



9:4b PAGP ^0-\ 



SEU 67 



^595 



?59t> 
0597 

2599 



5600 



a603 



015;56 
015756 
01574? 
015746 
015750 
015752 
015756 
015762 

015764 
015764 
015766 
015770 
015772 
015776 
016002 
016004 
016006 
016012 
016014 
016014 

016016 
016016 
016016 



012746 
Olt.746 
010600 
104415 
062706 
004767 
000414 



010446 
010146 
010546 
012746 
012746 
010600 
104415 
062706 
000207 

004736 



104423 



007455 
000001 



000004 
000002 



PRINTX #EF9302 



007357 
000004 



000012 



JSR 



PC, 50$ 
601 



501 J 



PRINTX #£F9301,R5,R1,R4 



601; 



RT5 
PASS 



ENOMSG 



PC 



(REPORT OVKRFLOW CONDITION. 




MOV 


0EF9J0;?,-CSP) 


MOV 


01. (SP) 


MOV 


SP.RO 


TRAP 


C$PNTX 


ADD 


04, SP 


iREPORT THE LAST BMP CODE PLACED ON THE 


QUEUE. 


(EXIT. 




t PRINT THE MESSAGE. 




MOV 


R4 . (■ SP :) 


MOV 


Rl, (SP) 


MOV 


R5, (SP) 


MOV 


OEF9501, -fSP) 


MOV 


04 . - ( SP ) 


MOV 


SP.RO 


TRAP 


C«PNTX 


ADO 


012, SP 



JSR 



(RETURN. 

I RESTORE THE GPR CONTENTS 



PC.SICSP)* 



I RE TURN TO PREG05 SUBRT. 



LlO0l5i 



TRAP 



CJMSG 



D6 

8raBAM;if6oiHN^§^J^CT10/)C^O ^^^0^ 15-MAR.84 09:4tt PAGE 51 SEQ 66 



.'^05 .SBTTL GLOBAL SUBROUTINES SF.CTION 

OMS !*♦ 

.VU> t THt GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

.^m: » THAT ARE USED IN MORE THAN ONE TEST. 

c?t>lS I-- 



£6 



8rhBirsh«flN^'^''^'' MACRO M1.0(J^^^p^MAR.6A09,.8 PAGES. 



SEQ 69 



?.t3l 
2b^S 

2626 
?6?.7 
2628 
2629 
2630 
2651 
2652 
2655 
2654 
2655 
2656 
2657 
2638 
263^ 
2640 
2641 
2642 
2645 
2644 
2645 
2646 
264 7 
2648 

2649 
2650 
2651 
2652 
2655 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
£665 
2666 
2667 
2668 
2669 
26 70 
2671 
26/2 
2673 
26 74 
2675 



016020 
016020 



016024 
01602t) 
016030 
016052 



016056 
016040 
016042 
016044 
016050 
016052 
016054 
016056 
016060 
016062 
016064 



.SBTTL GLOBAL SUBROUTINE - ALTrLO - 

- ALTER DEVICE REGISTER FIELDS ROUTINE - 
THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 
USE EXAMPLES: SET RX. BAUD. RATE FIELDS ON LINES 3 ANJ 6. 

CLEAR TX.DMA BITS ON ALL LINES. 



INPUTS: 



OUTPUTS; 



Rl - ADDRESS OF THE REGISTERS TO ALTER. 

R2 - BIT FIELDS SET TO DESIRED STATES, 

R3 - BIT MAP OF LINES FOR WHICH TO ALTER REGISTER. 

R4 - MASK OF BITS TO ALTER CI INDICATES CHANGE BIT). 

CSRA - CONTAINS THE ADDRESS OF THE DEVICE CSR. 

lESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 

DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 
CSR INO.ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE: 



JSR 



PC.ALTFLD 



COMMENTS: THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 

WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 

THIS ROUTINE DOES NOT READ THE CSR. 

SUBROUTINES CALLED: NONE. 



004567 167300 



ALTFuD:; SAVE 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 jCALL REGISTER SAVE SUBRT. 



010400 
005100 
040002 
016705 164176 



I SET UP TO LOOP FOR EACH LINE: 

J PREPARE THE WORD TO BE OREO INTO THE REGISTER CONTENTS. 

J SET UP THE WORD TO WRITE INTO THE INO.ADR.REG FIELD OF THE CSR. 

. - 

iCALCULATE THE NEW CONTENT., OF THE 

I REGISTER FIELDS WHICH ARE TO BE 

I ALTERRED BY THIS ROUTINE.. 

iSET UP TO WRITE INO.ADR.REG FIELD TO 0. 

LOOP ONCE FOR EACH LINE. ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. 

EXIT THE LOOP IF NO MORE LINES TO ALTER, OR IF WE HAVE ALTERED THE MAX 
ALLOWABLE NUMBER OF LINES (AS SPECIFIED BY NUMLNS). 



MOV 


R4.R0 


COM 


RO 


BIC 


R0,R2 


MOV 


IESTAT.R5 



000241 
006003 
103006 
010577 
011100 
040400 
050200 
010011 
005205 
005 705 
001365 



aii 



164130 



4*1 



CLC 




ROR 


R5 


BCC 


4$ 


MOV 


R5.8CSRA 


MOV 


(Rl).RO 


BIC 


R4,R0 


BIS 


R2,R0 


MOV 


RO.CRl) 


INC 


R5 


TST 


R5 


BNE 


2$ 



iPREPARE FOR ROTATE. "TST R5- DOES THIS BELOW 

iGET THE LINE SELECT BIT FOR THIS LINE. 

iSKIP SETUP IF LINE lb NOT SELECTED. 

iSET OUT CSR INO.ADR.REG FIELD TO THIS LINE. 

iGET THE PRESENT CONTENTS OF THE REG TO ALTER 

iCLEAR THE BIT FIELDS WE ARE TO ALTER. 

jOR IN THE NEW STATES OF THE FIELDS. 

jWRITE THE NEW REGISTER CONTENTS TO THE REG. 

(SET LINE NUMBER TO THE NEXT LINE. 

iCHECK FOR LWHANOLEO LINES. CLEAR CARRi ruAG, 

jLOOP IF SELECTED LINECS) IS NOT HANDLED. 



F6 

DHU-ll TUNC TST PART4 MACRO M1200 15 -MAR -81 09; 46 PAGE. 5^-1 SEQ 70 

GLOBAL SUBROUTINt - ALTF'LO - 

^677 016066 60$ i PASS j RESTORE GPRS. 

016066 004756 JSR PC.flCSP)* i RETURN TO PREG05 SUBRT . 

5678 016070 000207 RtS PC jRETURN TO CALLING ROUTNE. 



G6 



DHUll FUNC TST PART4 
GLOBAL SIIBROUTINE 



MACRO M1200 15 -MAR -84 09:48 PAGE 53 
" CALMSL - 



SEQ 71 



2630 
2681 
2682 
2683 
2684 
2685 
2686 
2687 
2688 
2689 
2690 
2691 
2692 
2693 
2694 
2695 
2696 
2697 
2698 
2699 
2700 
2701 
2702 
2703 
2704 
2705 
2706 
2707 



2709 
2710 
2711 
2712 
2713 
2714 
2715 
2716 
2717 
2716 
2719 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2?31 
2/52 
2755 
2734 
2735 



016072 
016072 
016076 



.SDTTL GLOBAL SUBROUTINE - CALMSL - 

♦ - CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE - 

* THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 

♦ ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 

• WHICH IS THE ^iUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 

• THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT BY USING THE 

♦ LINE TIME CLOCK (LTC). 30 IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 

• THE DELAY COUNT MUST BE USED. 



* INPUTS 



• OUTPUTS; 



MSLCNT 

MSTICK 
TIMER 1 
CLKHRZ 

CARRY 
MSLCNT 



DEFAULT 1 MS DELAY LOOP COUNT VALUE. OR 

VALUE FROM PREVIOUS CALIBRATION. 

NUMBER OF MS PER LTC CLOCK TICK. 

TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 

NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 

SET IF LTC IS AVAILABLE. AND NEW CALIBRATION PERFORMED 
■ NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE, OR 
UNCHANGED IF NO LTC IS AVAILABLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC , CALMSL 



♦ SUBORDINATE ROUTINES CALLED: UNSDIV.OOPS, 



004567 
005067 



167226 
000210 



CALMSL: t SAVE 

CLR 



62$ 



JSR 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 I CALL REGISTER SAVE SUBRT, 
J CLEAR THE cfND TIME FLAG. 



; SYNCHRONIZE WITH THE LTC. 



016102 012705 000001 



016106 005000 

016110 012767 000001 

016116 005767 164156 

016122 001410 

016124 005200 

016126 001373 

016130 005305 

016132 005371 



016134 005067 164136 
016140 000241 
016142 000461 



016144 012704 002300 



164162 



2$: 



4$: 



MOV 



CLR 
MOV 
TST 
BEQ 
INC 
BNE 
DEC 
BGT 



<?1.R5 



I SET OUTER LOOP COUNTER TO 1 LOOP. 
I INCREASE THE VALUF_ LOADED INTO THIS COUNTER IF THE 
I FOLLOWING LOOP FAILS ON FUTURE, FASTER PROCESSORS. 

RO I CLEAR THE WAIT FOR CLOCK INT COUNTER. 

tfl.TIMERl iSET UP COUNT OF 1 TO SYNCH WITH LTC. 

TIMERl i CHECK FOR COUNTER HAVING GONE TO ZERO. 

6$ I JUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 

RO t COUNT THIS ITERATION OF THE INNER LOOP. 

41 jLOOP IF COUNTER HAS NOT TURNED OVER. 

R5 (DECREMENT THE INNER LOOP COUNTER. 

4$ jLOOP IF OUTER LOOP COUNT NOT UP. 






IF WE GOT NO LTC INTERRLJPT, INDICATE 
LTC MUST BE FLAKEY. OR NOT REALLY AN 



THAT THERE 
LTC AT ALL 



IS NO LTC AVAILABLE 



WF ARE 
SET UP 



64 



CLR 
CLC 
BR 

NOW 
FOR 

MOV 



CLKHRZ 
60$ 



iCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 

jINDICATE FAILURE FOR RETURN. 

(BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



SYNCHRONIZED WITH THE LTC 
THE CALIBRATION LOOP. 



0TXMERI.R4 



(WILL TEST TIMERl IN THE LOOP BELOW. 



DHU U FUNC TST PART4 
GLOBAL 3i.lBR0UTlNE 



H6 
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*^EQ 72 



^736 

2757 

2758 

2759 

2740 

2741 

2742 

2745 

2744 

2745 

2746 

2747 

2748 

2/49 

2750 

2751 

2752 

?755 

2754 

2755 

2756 

2757 

2758 

2759 

2760 

2761 

2762 

2765 

2764 

2765 

2766 

2767 

2768 

2769 

2770 

277] 

2772 

2775 

2774 

2775 

2776 

2777 

277A 

2779 

2780 

2781 

2782 

2785 

2784 

2785 
2786 
2787 
2708 



016150 
016152 
016154 
016156 

016162 
016166 
016170 
016174 
016176 
016200 
016202 
016204 
016206 
016210 
016212 
016214 



005001 
005002 
005005 
012714 000001 



016220 
016222 
016226 
016250 
016232 
016234 
0162.^6 
016240 
016242 
016244 
016246 



016250 
016254 
016256 
016260 
016264 
016266 
016272 
016276 
0165C2 
016504 

016506 
016306 
016510 

016512 
0163X4 



016705 

011400 

010067 

040200 

020005 

000261 

00140v 

005505 

001567 

005501 

001363 

004767 



005401 
016702 
010203 
160502 
010204 
005005 
005501 
100405 
060504 
005505 
000773 



016701 
010405 
010502 
004767 
105402 
004767 
010167 
005167 
001277 
000261 



004 756 
00C207 

000000 
000000 



164124 
000120 



003604 



164064 



164054 



010076 

003552 
164014 
000010 



8$: 

10$: 



CLR 
CLR 
CLR 

MOV 

MOV 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNt 
JSR 



Rl 
R2 
R3 

MSLCNT.R5 

(R4),H0 

R0,64$ 

R2,R0 

R0,R3 

12i 

R5 

10$ 

Rl 

8$ 

PC » OOPS 



i WE HAVE NOW HAVE LOOP COUNT 
t WE HAVE NEGATIVE OF NUMBER 
I WE HAVE THE PORTION OF THE 
1 NOW we CALCULATE THE TOTAL 



12$: 


NEG 


Rl 




MOV 


rtSLCNT.R2 




MOV 


R2,R3 




sue 


R5.R2 




MOV 


R2.R4 




CLR 


R5 


14$: 


DEC 


Rl 




BMI 


16$ 




ADD 


R5.R4 




ADC 


R5 




BR 


14$ 


1 DIVIOF, ThL TOTAL NUMBER 


16$: 


MOV 


MSTICK.Rl 




MOV 


R4.R5 




MGV 


R5.R2 




JSR 


PC.UNSDIV 




BCS 


18$ 




JSR 


PC. OOPS 


18$: 


MOV 


Rl.MSLCNT 




COM 


62$ 




BNE 


2$ 




SEC 




60$: 


PASS 


1 




RT5 


J 
PC 


62$: 


.WORD 





64$ J 


.WORD 






I CLEAR THE OUTER LOOP COUNTER. 
I INDICATE TO CHECK ALL BITS OF TIMERl. 
I INDICATE TO CHECK FOR TIMERl CLEAR. 
iLOAD TIMERl WITH COUNT OF 1. 

I LOAD MS LOOP COUNT. 

(GET THE TIMERl VALUE. 

jSAVE WO?^D (LIKE IN THE REAL LOOP). 

; LEAVE ALL THE BITS. 

I COMPARE AGAINS1 ZERO. 

I SET CARRY IN CASE OF SUCCESS. 

lEXIT LOOP IF TIMERl HAS CLEARED. 

I COUNT DOWN THE INSIDE MS LOOP COUNT. 

.LOOP IF MS NOT UP. 

iDECREMENT THE MS TIMP COUNT. 

(KEEP LOOPING. 

iWE OVERFLOWED, SOHf IhJNG IS WRONG, ABORT. 

INFORMATION FOR ONE CLOCK TICK. 
OF OUTER LOOPS IN Rl. EACH IS MSLCNT INNER LOOPS. 
LAST OUTER LOOP NOT EXECUTED. IN R5. 
NUMBER OF INNER LOOPS EXECUTED. 

jGET NUMBER OF OUTER LOOPS. 

iGET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 

;COPY NUMBER OF LOOPS FOR MULTIPLY. 

tCALC # OF INNER LOOPS DONE IN LAST OUTER LOOP 

J ANO ADO TO ACCUMULATOR LSWORD. 

J CLEAR ACCUMULATOR MSWORD. 

iCHECK Rl FOR CONDITION 

I SKIP MULTIPLICATION IF ZERO 

(MULTIPLY NUMBER OF INNER 

i LOOPS PER OUTER LOOP BY 

J NUMBER OF OUTER LOOPS PERFORMED. 

TOTAL NUMBER OF INNER LOOPS BY THE NUMBER OF MS PER LTC TICK. 

Id OF MS PER LTC TICK IS DIVISOR. 

i LSWORD OF LOOP COUNT IS LSWORD OF DIVIDEND. 

I MSWORD OF LOOP COUNT IS MSWORD OF DIVIDEND. 

tOIVIOE NUMBER OF LOOPS BY MS PER LTC TICK. 

(BYPASS OOPS IF WE'RE OK. 

jCLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 

I SET NEW VALUE FOR MS LOOP COUNT. 

jSET THE 2ND ITERATION FLAGS IF 1ST ITERATION. 

jBRANCH IF QULi ONE ITERATION DONE. 

iSET THE SUCCESS FLAG FOR EXIT. 



:RE5T0RE GPRS. 

PC.aCSP)* 

I CARRY - SUCCESS FLAG 



iRETURN TO PREG05 SUBRT 
SET IF SUCCESS. 



j2N0 CALIBRATION ITERATION FLAGS. 

(DUMMY WORD FOR STORAGE OF THE READ WORD, 
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SEQ 73 



2790 

279?. 

2794 
2 795 
2796 
c*797 
3798 
2799 
2800 
2801 
2802 
2803 
2804 
2805 
2806 
2807 
2808 
2809 
2810 
2C11 
2612 
2813 
2814 
2815 
2816 
2817 
2818 
2319 

2820 
2821 
2822 
2823 
2824 
2825 
2326 
2827 
2828 
2829 
2830 
2831 
2832 
2833 
2834 
2835 
2836 
2837 
2838 
2839 
2840 
2841 
2842 
284 3 
2844 
2845 



016316 
016316 
016322 
016326 
016330 
016332 
016334 
016336 
016340 
016342 
016344 
016346 
016352 
016354 
016560 
016364 
016366 
016370 
016372 
016374 
016376 
016400 
016402 



004567 
016302 
005724 
012400 
100026 
040500 
112201 
040501 
120100 
001021 
016300 
005200 
016301 
020061 
C01407 
011400 
100005 
040500 
U1201 
040501 
020001 
001002 



167002 
003402 



003542 

005234 
003442 



- CHECK FOR EXTRA CHARACTER ROUTINE - 
THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH INDICATES THAT AN EXTRA 
CHARACTER HAS BEEN RECEIVED DURING THE RECEPTION OF A DATA PATTERN. 
IF THIS ROUTINE DETERMINES VHAT IT IS LIKELY THAT AN EXTRA CHARACTER 
HAS BEEN RECEIVED IT INDICATES THIS IN THE STATUS INFORMATION RETURNED 
TO THE CALLING ROUTINE. 



INPUTS! 



R3 - 
R4 - 
R5 - 



RX LINE NUMBER MULTIPLIED BY 2 (OFFSET INTO WORD TABLES). 
BASE ADDRESS OF RESYNC QUE CONTAINING RX CHARS. 



MASK OF 



SBTTL GLOBAL SUBROUTINE - CHKEXT - 

*■ 

* 

;♦ 
1* 
J* 
i* 
;* 
;* 
J* 
(♦ 
;♦ 
;* 
t* 
i* 
I* 
;* 
;* 
»* 
I* 

i - 



CHCNTB 
RXCNTB 
RXPTRB 
TXRXLB 



BASE 
BASE 
BASE 
BASE 



'INACTIVE" CNON-OATA) BITS OF RX AND TX CHARS. 
OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 

THE RX CHARACTER COUNTERS TABLE. 

THE RX CHARACTER POINTERS TABLE. 

TX/RX LINE NUMBER ASSOCIATION TABLE. 



OF 
OF 
OF 



OUTPUTS: 



CARRY - SET IF EXTRA CHARACTER CONDITION IS VERIFIED. 



CALLING SEQUENCE: 



JSR 



PC, CHKEXT 



COMMENTS: 



THE FOLLOWING 
CHRO 
CHRl. 
EXPO 
EXPl. 



SYMBOLS ARE USED IN LINE COMMENTS: 
CHARACTER AT BOTTOM Of RESYNC QUE (FIRST RECEIVED). 

CHR2 - 2 CHARACTERS RECEIVED AFTER CHRO. 
CHARACTER EXPECTED TO BE RECEIVED NEXT. 

EXP2 - CHARACTER EXPECTED TO BE RECEIVED AFTER EXPO, ETC. 



SUBORDINATE ROUTINES CALLED: NONE. 



CHKEXT:; SAVE 





JSR R 


MOV 


RXPTRB(R3),R2 i 


TST 


(R4)» I 


MOV 


(R4)*.R0 I 


BPL 


52$ i 


BIC 


R5,R0 1 


MOVB 


(R2)*,R1 i 


BIC 


RS.Rl 1 


CMPB 


Rl.RO I 


BNE 


521 1 


MOV 


RXCNTB(R3).R0 i 


INC 


RO ) 


NOV 


TXRXLB(R3),R1 j 


CMP 


RO.CHCNTBCRn i 


BEQ 


50i 1 


MOV 


(R4).R0 1 


BPL 


50* 1 


BIC 


R5.R0 i 


Move 


(R2).R1 1 


BIC 


R5,R1 » 


CMP 


RO.Rl 1 


BNE 


52$ I 



tSAVE CONTENTS OF GPRS RO THRU R5. 
R5,PHEG05 (CALL REGISTER SAVE SUBRT. 

GET THE RX DATA POINTER. 

INCREMENT R4 BY 2 TO POINT TO CHRl. 

GET CHRl FROM THE QUE. DATA. VALID INTO N FLAG. 

EXIT WITH "FAILURE" IF CHRl NOT VALID. 

REMOVE INACTIVE BITS FROM CHRl VALUE. 

GET EXPO FROM THE DATA PATTERN. 

REMOVE INACTIVE BITS FROM EXPO VALUE. 

COMPARE CHRl AND EXPO. 

EXIT WITH "FAILURE" IF CHRl <> EXPO. 

COMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 
WITH THE EXPECTED NUMBER OF CHARS TO RX ON 
LINE (NUMBER TRANSMITTED AND LOOPED BACK) TO 
DETERMINE IF CHRl IS LAST EXPECTED CHAR. 

EXIT WITH "SUCCESS" IF CHRl IS LAST CHAR. 

GET CHR2 FROM THE QUE. DATA. VALID INTO N FLAG. 

EXIT WITH "SUCCESS" IF CHRl WAS LAST IN QUE. 

REMOVE INACTIVE BITS FROM CHR2 VALUF . 

GET THE EXPl VALUE. 

REMOVE INACTIVE BITS FROM EXPl VALUE. 

COMPARE CHR2 AND eXPl. 

EXIT WITH "FAILURE" IF CHR2 <> EXPl. 



t * 



IT IS LIKELt THAT WE RECEIVED AN EXTRA CHARACTER WITHIN THE DATA PATTERN. 
INDICATE "SUCCESS" AND EXIT. 



1 - 



DHU-U FUNC TST 


PART4 


GLOBAL SIBROUTINE 


2846 016404 


000261 


2847 016406 


000401 


2848 




2849 




2850 




2851 




2852 




2855 016410 


000241 


2854 




2855 016412 




016612 


004 756 


2856 016414 


000207 



J6 
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- CHKEXT - 



50$: 



SEC 
BR 



PAGE 54-1 



60* 



jSET THE SUCCESS FLAG. 
lEXIT THE ROUTINE. 



Wfc DIDN'T RECEIVE A SINGLE EXTRA CHARACTER AT THIS POINT IN THE DATA PATTERN, 
INDICATE "FAILURE" AND EXIT. 



52$: 
60J: 



CLC 
PASS 
RTS 



PC 



JSR 



CLEAR THE SUCCESS FLAG. 

RESTORE GPRS. 
PC.aCSP)* jRETURN TO PREG05 SU5RT 

CARRY - SLf IF SUCCESS (EXTRA CHAR RX£D;. 



SEQ 74 



Kb 



DHU U FUNC TST PART4 
GLOBAL SI»BR0UT1N£ 

^858 
2859 

2860 
2861 

2862 
28b3 
2864 
2865 
2866 
2867 



2870 
2871 
2872 
2873 
2874 
2875 
2876 
2877 
2873 
2879 
2880 
2881 
2882 
2883 
2884 
2885 
2086 
2887 
2888 

2889 
2890 
2891 
2892 
2893 
2894 
2895 
2896 
2897 
2898 
2899 
2900 
2901 
2902 
2905 
2904 
2905 
2906 
2907 
2908 
2909 
2910 
29U 
2912 
2913 



016416 
016416 
016422 
016426 
016430 
0164S4 
016440 
016442 
016444 
016446 
016450 
016454 
016456 
016460 
016462 

016464 
016466 
016470 
016472 
016474 
016476 
016500 
016502 



004567 
016301 
005201 
016300 
016002 
020102 
001423 
005201 
160201 
016302 
005202 
112200 
162400 
040500 

001012 
005701 
001406 
011401 
100004 
111200 
160001 
040501 
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SEQ 75 



CHKLOS 



*4i4i4i*4i***«**4>*****A******4i*4**4i*4iA4i*Ji*«**«*«4>***«*4i4i**4i**4i*4i*4*<*A4i********4i 



i * ^ 

!* 
•'♦ 

J* 

;* 
;* 
i* 

;* 

;♦ INPUTS: 

!* 

J* 
;* 
J* 
;• 
I* 
i* 
J* 
t* 
;* 
;* 
»♦ 
;* 
;• 
i* 
;* 
;• 
I* 



- CHECK FOR LOST CHARACTER ROUTINE - 
THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH INDICATES THAT A CHAR 
HAS BEEN "LOST" FROM THE LOOPED BACK DATA PATTERN DURING A TRANSMISSION 
AND RECEPTION TEST. IF THIS ROUTINE DETERMINES THAT IT IS LIKLLY THAT 
A CHARACTER HAS BEEN LOST. IT INDICATES THIS IN THE STATUS INFORMATION 
RETURNED TO THE CALLING ROUUNE . 

R3 - RX LINE NUMBER MULTIPLIED BY 2 (OFFSET INTO WORD TABLES). 

R4 - BASE ADDRESS OF RESYNC QUE CONTAINING RX CHARS. 

R5 - MASK OF "INACTIVE" (NON-DATA J BITS OF RX AND TX CHARS WITH 

ALL SET BITS IN A SINGLE. LEFT JUSTIFIED GROUP. 
CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 
RXCNTB - BASE OF THE RX CHARACTER COUNTERS TABLE. 
RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 
TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

OUTPUTS: CARRY - SET IF LOST CHARACTER CONDITION IS VERIFIED. 

CALLING SEQUENCE: JSR PC » CHKLOS 

COMMENTS: THE FOLLOWING SYMBOLS ARE USED IN LINE COMMENTS: 

CHRO - CHARACTER AT BOTTOM OF RESYNC QUE (FIRST RECEIVED). 

CHRl, CHR2 - 2 CHARACTERS RECEIVED AFTER CHRO. 

EXPO - CHARACTER EXPECTED TO BE RECEIVED NEXT. 

EXPl, EXP2 - CHARACTER EXPECTED TO BE RECEIVED AFTER EXPO, ETC, 

SUBORDINATE ROUTINES CALLED: NONE, 



166702 
003542 

005234 
003442 



003402 



016504 001002 



CHKLOS:; SAVE 

MOV 
INC 
MOV 
MOV 
CMP 
BEQ 
INC 
SUB 
MOV 
INC 
MOVB 
SUB 
BIC 

BNt 

TST 
BEQ 

MOV 
BPL 
MOVB 

BIC 

BNt 



JSR 
RXCNTB(R3),Ri. 
Rl 

TXRXLB(R3),R0 
CHCNT8(R0),R2 
R1.R2 
52$ 
Rl 

R2.RI 

RXPTRB(R3),R2 
R2 

(R2)».R0 
(R4).,R0 
R5,R0 

52$ 

Rl 

50* 

CR4),R1 

50$ 

CR2),R0 

RO.Hl 

R5.R1 

52$ 



I SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 ;CALL REGISTER SAVE SUBRT, 

I COMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 

i WITH THE EXPECTED NUMBER OF CHARS TO RX ON 

I LINE (NUMBER TXED AND LOOPED BACK) TO 

J DETERMINE IF THE POSSIBLE LOST CHAR 

i WOULD BE THE LAST EXPECTED RX CHAR. 

iEXIT WITH "f AILURE" IF LOST CHR WOULD BE LAST. 

;DETERMINe (AS ABOVE) IF CHRO WOULD Bfc THE LAST 

, RX CHAR AND SAVE RESULT FOR LATER. 

(GET THE RX DATA POINTER. 

(CALCULATE POINTER TO EXPl LOCATION. 

(GET EXPl VALUE FROM DATA PATTERN. 

(COMPARE CHRO AND EXPl VALUES, 

(REMOVE INACTIVE BITS FROM RESULT. (NO ACTIVE 



t BITS ALLOWED TO LEFT 
;EXIT WITH "FAILURE" IF 
jCHECK CHRO TEST RESULT 
lEXIT WITH "SUCCESS" IF 
I GET CHRl FROM THE QUE, 
lEXIT WITH "SUCCESS" IF 
joET THE EXP2 VALUE FROM 



OF ANY INACTIVE BITS.) 
CHRO <^ EXPl. 
SAVED ABOVE. 
CHRO IS LAST CHAR. 
DATA. VALID INTO N FLAG 
CHRO WAS LAST QUE CHAR 
THE DATA PATTERN. 



(COMPARE THE EXP2 AND THE CHHl VALUES. 
(REMOVt INACTIVE BITS FROM RESULT OF COMPARE 
: (NO ACTIVE BITS LEFT OF INACTIVt BITS.) 
(EXIT WITH "FAILURE" IF CHRl <> EXP2. 
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L6 
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SEQ 76 



1^914 

?918 
2919 
2920 
2921 
29.^2 
2923 
2924 
2925 
2926 



2928 



016506 
016510 



016514 
016514 
016516 



000261 
000401 



016512 000241 



IT IS LIKtLY THAT WE LOST A CHARACTER FROM THE DATA PATTERN. 
INDICATE "SUCCESS" AND EXIT. 



50$: 



SEC 
BR 



60$ 



tSET THE SUCCESS FLAG. 
jEXIT THE ROUTINE. 



WE DIDN'T LOSE A SINGLE EXTRA CHARACTER AT THIS POINT IN THE DATA PATTERN. 
INDICATE "F-AILURE" AND EXIT. 



004736 
000207 



525: 
60$; 



CLC 
PASS 
RTS 



PC 



JSR 



iCLEAR THE SUCCESS FLAG. 

(RESTORE GPRS. 

PC.a(SP)* (RETURN TO PREG05 SUBRT 

jCARRY - SET IF SUCCESS (LOST CHAR LIKELU. 



M6 



DHU-U FUNC T^T PAR 
GLOBAL SUBROUTINE 
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SEQ 77 



?950 
2951 

2953 
2954 
2955 
2956 
295/ 
2958 
2959 
2940 



294 5 
2944 
2945 
2946 

294 7 
2948 
2949 
2950 
2951 
2952 

295 Z 
2954 
2955 
2956 
295 7 
2958 
2959 
2960 
2961 
2962 
2965 
2964 
2965 

2966 
2967 
2968 
2969 
2970 
2971 
2972 
29/5 
29/4 
2975 
2976 
2977 
2978 
2979 
2980 
2981 
2982 
298 5 
2984 
2985 



.SBTTL GLOBAL SUBROUTINE 



- CKCHR 



*4i**«4>***«***4>******4>*«******4>**4i4i***A****4*4>*4:4i**********«4i*«4>'»* + *4i«*+**4*4' 



016520 
016520 



016524 
016532 



004567 166600 



036567 002364 
001407 



016554 
016540 
016542 
016544 
016550 



012701 
011402 
040502 
052704 
000452 



011306 



100000 



i* 

;• 

• * 

;♦ 
I* 
i* 
t* 
I* INPUTS: 

i* 

■ * 

;* 

i* 
;♦ 
t* 
i* 

!♦ 

:* 

i* 
t* 

:* 

* ■■■ 

!* 

I* 

;♦ 
t* 
i* 
;♦ 
t* 
i* 
J* 
i* 
;* 



- CHECK CHARACTER FOR ERRORS ROUTINE - 
THIS SUBROUUNE CHECKS THE CHAPACTER AT THE BOTTOM OF THE RESYNC QUEUE 
TO DETERMINE IF IT IS CORRECT. POINTERS AND COUNTERS WHICH ARE RELATED 
TO THE. RECEPTION OF THE CHARACTER ARE UPDATED. IF THE CHARACTER IS 
INCORRECT. AN ANALYSIS OF THE ERROR IS DONE AND PARAMETERS ARE SET UP 
FOR THE REPORTING OF THE CORRECT ERROR. 

R3 - LINE OFFSET FOR ACCESS OF WORD TABLES OF LINE VARIABLES. 

R4 - BASE ADDRESS OF THE RESYNC QUEUE FOR THIS LINE. 

R5 - MASK OF THE INACTIVES BITS IN A TX OR RX CHAR BYTE. 

BITTBL - TABLE OF WORDS WITH BITS SET FOR USE IN FORMING MAPS. 

DPRSQ - DATA PATTERN RESYNC QUE WITH VALID CHAR AT BOTTOM. 

EXCNTB - BASE OF THE EXTRA CHARACTER COUTERS TABLE. 

RXDONF - RECEIVE DONE FLAGS. 

RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 



OUTPUTS; 



ERROR MESSAGE LABELS - EM9007 .EM9008,EM9027,EM9028 

Rl - CONTAINS THE ADDRESS OF THE ERROR MESSAGE TO BE REPORTED 
R2 - CONTAINS THE ACTUAL RECEIVED DATA. 
R4 - CONTAINS THE EXPECTED DATA. 

CARRY - "SUCCESS' FLAG (SET IF NO ERROR IS FOUND). 
FOLLOWING VARIABLES UPDATEC FOR LINE ON WHICH CHAR WAS RECEIVED 
EXCNT - COUNT OF THE NUMBER OF EXTRA CHARS RECEIVED ON LINE. 
RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 
RXPTR - UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 
ERRBLK - CONTENTS DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, CKCHR 



SUBORDINATE ROUTINES CALLED: CHKEXT .CHKLOS.UPDCHR. 



CKCHR: : SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR H5.PREG05 jCALL REGISTER SAVE SUBRT . 



CHECK FOR THE RX OF A CHAR AFTER RX SHOULD BE COMPLETE ON THIS LINE. 

163752 BIT BITTBLCR3) .RXDONF jTEST THE RX DONE FLAG FQR THIS LINE. 

BEQ 2$ J SKIP ERROR REPORT IF RX NOT COMPLETE ON LINE 

! WE HAVE RECEIVED AN EXTRA CHARACTER ON THIS LINE. 

t SET UP FOR ERROR REPORT AND EXIT TO REPORT THE ERROR. 

: COUNT THE EXTRA CHARACTER. 

EXIT TO REPORT "UNEXPECTED CHAR RECEIVED AFTER RX COMPLETE ON LINE NN" 

(SELECT "EXTRA CHAR ON LINE" ERROR MESSAGE. 
iGET THE ACTUAL DATA FOR ERROR REPORT. 
(REMOVE THE INACTIVE BITS. 

(INDICATE "NONE" EXPECTED DATA FOR ERROR RP r . 
[GO COUNT EXTRA CHAR AND EXIT WITH "FAILURE". 

GET THE POINTER TO THE NEXT EXPECTED RECEIVE DATA CHARACTER. 



I 
1 - 



MOV 


<^£M900/,R1 


MOV 


(R4).R2 


BIC 


R5.R2 


BIS 


*eiT15.R4 


BR 


12$ 



016552 016302 003402 



2$: 



MOV 



HXPTRB(R3).R2 



DHU-ll KUNC TST P 
GLOBAL SUBROUTINE 



N6 



PARTfl MACRO M120 



'^%<ch^ 



-MAR-84 09:48 PAGE 56-1 



SEQ 78 



2986 

2937 

<>988 

2989 

2990 

2991 

2992 

2995 

2994 

2995 

2996 

299 7 

2998 

2999 

3000 

3001 

3002 

3003 

3004 

3005 

3006 

3007 

3008 

3009 

3010 

3011 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 

3020 

3021 

3022 

3023 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

305 7 

3058 

30.59 

3040 

304 1 

3042 



016556 
016560 
016562 
016564 
016566 
016570 
016572 
016576 



016600 
016604 



016606 
016612 
016614 
016616 
016620 
016622 
016624 



016626 
016632 



016634 
016640 
016642 
016644 
016646 
016650 
016652 
016656 



01 6660 
C16^j02 
016664 



011400 
040500 
111201 
040501 
120001 
001003 
004 76 7 
000446 



007720 



004767 177512 
103010 



012701 

111200 

040500 

011402.' 

040502 

010004 

000424 



004 767 
103012 



012701 
111200 
040500 
011402 
040502 
010004 
004767 
000404 



010002 
010104 
0X2701 



012121 



17756A 



012201 



007640 



COMPARE THE ACTUAL DATA WITH THE EXPECTED DATA. 

(GET THE ACTUAL DATA. 

jREMOVE THE INACTIVE BITS. 

iGET THE EXPECTED DATA. 

jREMOVE THE INACTIVE BITS. 

i COMPARE ACTUAL AND EXPECTED. 

i CHECK FURTHER IF DATA MISCOMPARE . 

1 UPDATE PTRS AND COUNTERS FOR THE CHAR. 

lEXlT WITH "SUCCESS". NO ERROR FOUND. 

ACTUAL AND EXPECTED DATA MISCOMPARE. 

DETERMINE IF IT'S LIKFLY WE RECEIVED AN EXTRA CHAR WITHIN THE DATA PATTERN 



MOV 


(R4),R0 


BIC 


R5.R0 


MOVB 


(R2).R1 


BIC 


R5,R1 


CMPB 


R0»R1 


BNE 


4$ 


JSR 


PC.UPDCHR 


BR 


50$ 



4$: 



JSR 
BCC 



PCCHKEXT 
6$ 



;CHECK FOR EXTRA CHAR RX'ED IN PATTERN. 
iGO CHECK FOR LOST CHAR IF NO EXTRA CHAR. 



IT IS LIKELY THAT WE RECEIVED AN EXTRA CHARAC '"ER WITHIN THE DATA PATTERN. 
COUNT THE CHAR AS AN EXTRA CHAR. DON'T COUNT MS A STANDARD CHAR. 
REPORT "EXTRA CHAR RECEIVED WITHIN DATA FATTERN ON LINE NN" 

i SELECT "EXTRA CHAR ON LINE" ERROR MSG. 

;GET THE EXPECTED RECEIVE DATA. 

iREMOVE THE INACTIVE BITS FROM EXPECTED OATP 

(GET THE ACTUAL RECEIVE DATA. 

jREMOVE THE INACTIVE BITS FROM ACTUAL DATA. 

:PASS EXPECTED DATA TO ERROR REPORT ROUTINE. 

iGO COUNT EXTRA CHAR AND EXIT WITH "FAILURE" 

ACTUAL AND EXPECTED DATA MISCOMPARE. 

NOT LIKELY- THAT WE RECEIVED AN EXTRA CHARACTER WITHIN THE DATA PATTERN. 

DETERMINE IF IT'S LIKELY WE LOST A CHARACTER FROM THE DATA PATTERN. 



MOV 


*EM9027 


Rl 


Ml-'VR 


(R2).R0 




BIC 


R5.R0 




MOV 


CR4),R2 




BIC 


R5.R2 




MOV 


R0.R4 




BR 


12$ 





6i 



JSR 
BCC 



PC.CHKLOS 
8$ 



; CHECK FOR 
I GO REPORT 



A L OST CHAR CONDITION, 

BAD RX DATA IF NOT LOST CHAR 



IT IS LIKELY THAT WE LOST A CHARACTER FROM THE DATA PATTERN. 
COUNT THE CHAR IN THE RX CHAR COUNT AS IF IT HAD BEEN RECEIVED. 
ALSO. COUNT CHRO AS A VALID CHAR, BECAUSE WE HAVE VERIFIED IT ABOVE. 
REPORT "SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE NN" 



MOV 

MOVB 

BIC 

MOV 

BIC 

MOV 

JSR 

BR 



*FM902fl,Rl 
(R2).R0 
R5,R0 
(R4),R2 

R5.R2 
R0.R4 
PCUPDCHR 
lOJ 



MSG 



t t t M 



tSELECT "LOST CHAR ON LINE" ERROR 

iGET THE EXPECTED RECEIVE DATA. 

iREMOVE THE INACTIVE BITS FROM EXPECTED DATA. 

(GET THE ACTUAL RECEIVE DATA. 

(REMOVE THE INACTIVE BITS FROM ACTUAL DATA, 

(PASS EXPECTED DATA TO ERROR REPORT ROUTINE. 

lUPOATE PTRS AND COUNTERS FOR THE CHAR. 

iGO EXIT WITH "FAIIURE". 



DID NOT LOSE OR GAIN A SlNGLh CHARACTER FROM/TO THE OATA PATTERN. 
REPORT 'RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE NN" 



8$: 



011371 



MOV R0.R2 
MOV R1,R4 
MOV ^>EM9000.Rl 



(PASS ACTUAl DATUM TO ERROR REPORl ROUT LNt , 
(PASS EXPECTED DATUM TO ERROR REPORT ROUTlNt 
;SELECT THE "DATA MXSCOMPARE" MESSAGE. 



DHU-ll f\MC TST PART4 
GLOBAL SVieROUTINE 



5045 
5044 
3045 
504t 
504 7 
5048 
504^ 
5050 
5051 
5052 
5055 
5054 
5055 
505b 
505? 
5056 
50S^ 
5060 
50t.l 
506? 
5065 
3064 
5065 
5066 



50o7 
5068 

506'^ 
3070 



016670 
016674 



0166 76 
01670? 
016704 



016710 
01671c? 



016716 
016/16 
0167?? 
0167?6 
01675? 



004 76 7 
000405 



005265 
00 100? 
005565 



000?41 
000401 



016714 000361 



01016b 
010?66 
010466 
004756 



B/ 



MACRO M1200 15-MAR-84 09:48 PAGE 56-2 
CKCHR . 



Sf.Q 79 



00 762? 

00524? 
00324? 



000004 
000006 
000012 



J UPDATE THE CHARACTER COiJNTER AND RX DATA PATTERN POINTER FOR THIS LINE. 



10$t 



JSR 
BR 



PC.UPOCHR 
14« 



lUPOATE RX PTR AND COUNTER FOR THIS LINE. 
iGO EXIT WITH "FAILURE". 



I COUNT THE CHARACTER AS AN EXTRA CHARACTER. 



121 1 



I » 



INC EXCNTB(R50 

BNE 141 

DEC EXCNTB(R5) 



i INDICATE "FAILURE" AND EXIT. 



14$: 



CLC 
BR 



60$ 



I * 



I NO ERROR WAi, FOUND. 

1 SET "SUCCESS" FLAG AND EXIT. 



I - 

50$ 

60$ 



SEC 

PASS 



R1»R2.R4 



MOV 
MOV 
MOV 
JSR 



I INCREMENT THE EXTRA CHAR COUNT FOR THIS LiNt". 

lEXlT WITH FAILURE IF NO OVERKQW. 

iDECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW. 



jCLEAR THE 'SUCCFSS" FLAG. 
lEXlT THE ROUTINE. 



016734 000207 



RTS 



PC 



iSET THE "SUCCESS*' FLAG. 

(RESTORE GPRS. EXCEPT 

Rl.RlSLOTCSP) jPUT Rl IN STACK SLOT. 

R?,R?SL0T(SP) (PUT R? IN STACK SLOT. 

R4,R4SL0T(SP) jPUT R4 IN STACK SLOT. 

PC,S(SP)» iRETURN TO PREG05 SUBRT. 

|R1 ■ CONTAINS THE ADDRESS OF THE ERROR REPORT, 
»R? - CONTAINS THE ACTUAL DATA RECEIVED. 
»R4 CONTAINS THE EXPECTED DATA. 



c/ 



m^k^ ^Momu^.''^^' ^^^^^ '^i'^^%Fii?R"^«-«'* ^^^^^ p'^^^ ^' 



SPG 80 



30 74 
50 ;s 

50 :t 
50 ;; 

50 78 

50 ; ^> 

5080 
5081 
508.-' 
5085 
3084 
508r> 
5086 

508 7 
5088 
506 -i 
50^0 

509 V 
509^ 
5095 
5094 
5095 
3096 
509 7 
5098 
3099 
5100 
3101 

3102 
3105 
3104 
5105 
3106 
5107 
3108 
3109 
3110 
3111 
3112 
3113 
5114 
511b 
5U6 
5117 
5116 
5119 
3120 
5121 
5122 
5123 
5124 
5125 
3126 



.SBTTL GLOBAL SUBROUTINE 



CKFRPR 



016756 
016756 
016742 
016746 



016752 
016756 
016764 
016766 
016772 
016776 
017002 
017006 

017010 
017014 
017016 
017022 
017026 



017054 
017034 



016701 
026767 
001402 
062701 
052701 
016702 
004 767 
103054 

00556 7 
001014 
01046 7 
012701 
012767 



- CHECK FRAMING AND PARITY ERROR Rf.PORTIhKi • 
THIS SUBROUTINE IS USED TN THE FRAMING ERROR AND PARlTr ERROR TESTS. 
IT READS THE CHARACTERS FRQM THE OUT RECEIVER CHARACTER FIFO, 
AND CHECKS FOR THE CORRECT COMBINATION OF PARITY AND FRAMING 
ERROR BITS IN THE MSB. IF CHARACTERS STOP APPEARING IN THE FIFO WITH 
DATA. VALID SET OR IF MORE THAN THE ALLOWABLE NUMBER OF CHARACTERS 
HAS BEEN READ FROM THE OUT THIS ROUTINE EXITS WITH AN RX COMPUTE 
INDICATION. EACH READ CHAR IS ANALYSED AND ANY NECESSARY ERRORfj ARE 
REPORTED, 

INPUTS: R5 - TEST FLAG. BIT15 SET - FRAMING ERR. CLEAR ■ PARITY ERR. 
ERRNBR - SET TO ERROR NUMBER OF FIRST ERROfl IN THIS ROUTINE. 
OSTENO - ADDRESS OF THE END OF THE OUTPUT STORAGE FIFO BUFFER, 
OSTPTR • POINTER TO THE NEXT BYTE TO READ FROM OSTORE. 

OUTPUTS: RXCNTB - RECEIVE CHARATER COUNT UPDATED FOR EACH LINE. 

RXPNTB - RECEIVE CHARACTER PIONTER IS UPDATED FOR EACH LINE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, CKFRPR 



THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR 

THRU INITIAL ERRNBR • 4. 

ERRNBR IS RESTORED BEFORE THIS ROUTINE RETURNS. 

SUBORDINATE ROUTINES CALLED; PRFRME.PRPARE .WAIBIS . 



004567 166562 
016704 166350 
004767 006706 



163270 
163520 

000062 
170000 
163200 
010004 



165462 

1662 74 
012001 
014032 



163206 2»: 



4»: 



MOV 
CMP 

8EQ 
ADD 
BIS 
MOV 

JSR 

BCC 



JSR 
ERRNBR. R4 

PC.TXIEI 



RXTOUT.Rl 
TXDONF.ACTLN'J 
41 

*50. ,R1 
0170000, Rl 
RBUF A.R2 
PC, WAIBIS 
60$ 



iSAVE CONTENTS Of GPRS RO THRu R5. 
R5.PREG05 iCALL REGISTER SAVE SU6RT. 

(PRESERVE THE INITIAL ERROR NUMBER, 
lENABLE TX INTERRUPTS. 



CKFRPR i: SAVE 

MOV 
JSR 

I WAIT FOR A CHARACTER TO APPEAR IN THE ^UO. 

I IF NO CHARACTER APPEARS WITHIN TIME-OUT PERIOD: EXIT ROUTINE, WE'RE DONE. 

iGET MINIMUM TIME OUT VALuE . 

iCMECK FOR TRANSMISSION DONE ON ACTIVE LINES. 

I SKIP ADDING 50 MS DELAY IF TX DONE ALl. L INt S 

jAOD 50 MILLI SEC TO DELAY IF NOT LAST CHAR. 

(INDICATE TO TEST DATA. VALID BIT. 

(INDICATE TO CHECK DOT RECEIVE BUFFER (FIFO). 

iWAIT FOR RECEIVED CHAR OR TIHE OUT. 

lEXlT ROLITINE IF TIME-OUT, WE'RE DONE. 



106266 



DEC CMRTOT 

BNE 61 

MOV R4. ERRNBR 

MOV #EM<K)25,R1 

MOV *EH0505.ERRBLK 



[DECREMENT THE TOTAL CHAR COUNTER. 
ISKIP ERROR IF NOT TOO MANY CHARS RECEIVED 
iSET ERROR NUMBER TO INITIAL ERHNBR . 
(SELECT THE ERROR MESSAGE TO BE REPORTbD. 
iSELrCT THE ERROR REPORT ROUTINE. 



I • 



I - 



REPORT ERROR AT INUIAL ERRNBR. 

"MORE THAN TWICE THE EXPKTfcD NUMBER OF 



CHARACTERS RECEIVED" 



104460 



ERROR 



I 



>^i»> ERROR 



<<».«.» 



TRAP 



C$tRROR 



D7 



mt^k^ ^momui''''' 



3150 
3131 
3KV 
31?? 
3154 

3136 
3137 
313H 
Sl?*^ 

3140 
3141 

3^4^ 

3143 
3144 
3145 
3146 
3147 
3148 
314<i 
3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3156 
3159 
3160 
3161 
316? 
5163 

3164 



017036 
017044 



017046 
017050 
01705:? 
017056 



017060 
017062 

017064 
0170/0 
017074 

017076 
017104 
017106 

017110 
017114 
017120 
017122 
017130 

017132 
017136 

017140 
017144 
017144 
017146 



012. '67 
000435 



010203 
000303 
042 703 
006503 



01050$ 
100012 

004767 
005 767 
001416 

032767 
001012 
000414 

004 767 
005767 
001404 
032767 
001403 

004 767 
00070; 
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000001 163160 



SEQ 81 



177760 



003162 
163130 



000100 163056 



003242 
163104 

000100 163032 



007360 



010467 166152 

004 736 
000207 



MOV 
BR 



ft l.K ERROR 
60$ 



I INDICATE THAT AN ERROR HAS BEEN FOUND. 
itXiT THIS ROUTINE WE HAVE GIVEN UP. 



t ♦ 



I EXTRACT THE LINE NUMBER Of THE NEW CHARACTER. 

I CALCU.ATE OFFSET FOR ACCE^iSING TABLES OF LINE VARIABLES. 



6$i 



I » 



MOV R2.R5 

SWAB R3 

Die ftl77760,R3 

ASL H5 



I COPY THE. READ CHARACTER. 

(GET THE LINE NUMBER IN THE LSB. 

iCLEAR THE UNWANTED BITS. 

(SHIFT LEFT TO FORM OfFSET INTO TABLES, 



I PROCESS THE READ CHARACTERS AS DICTATED BY THE TEST FLAG. 
» - 



&i 



lOt 
60$ 



MOV R5,R5 

BPL 8$ 

JSR PC.PRFRME 

TST FERROR 

BEQ 10$ 

BIT »6IT06. OPTION 

BNE lot 

BR 601 

JSR PC.PRPARE 

TST FFRROR 

BEQ 101 

BIT *fiTT06. OPTION 

BEQ 60$ 

JSR PC.UPDCHR 

BR 2$ 

MOV R4,ERRNBR 
PASS 

JSR 

RTS PC 



lOETERMlN WHICH TEST CALLED THIS ROUTINE. 
(BRANCH TO PROCESS CHARACTER IN PARITY TEST. 

iPROCESS FRAMING ERRORS RECEIVED. 

|HAS AN ERROR BEEN DETECTED ? 

iNO, THEN SKIP PROCESSING CHARACTERS FOR PARITY 

iTEST. 

(HAS EXTENDED ERROR REPORTING BEEN ENABLED ? 

(BRANCH IF IT HAS, 

(OTHERWISE EXIT. 

(PROCESS PARITY ERRORS RECEIVED. 

(HAS AN ERROR BEEN DETECTED ? 

(NO. THEN BRANCH TO UPDATE POINTERS. 

(HAS EXTENDED ERROR REPORTING PEEN ENABLED ? 

(EXIT IF IT HASN'T. 

(UPDATE POINTERS AND COUNTERS FOR THIS LINE. 
(LOOP TO READ NEXT CHAR FROM FIFO. 

(RESTORE THE ERROR NUMBER TO ITS INITIAL VALUE. 

(RESTORE GPRS. 

PC,aCSP)» iRETURN TO PREG05 SUBRT. 



E7 



mB\t 'Moi^nnr 
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SEQ 82 



316(5 

?167 

5169 
5170 
3171 
3172 
3173 
3174 
317^ 
3176 
31/7 
3178 
3179 
3180 
3181 
5182 
3183 
3184 
318S 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 

3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 



.SBTTL GLOBAL SUBROUTINE - CKINAC - 

* - CHECK FOR NEW CHARACTER ON INACTIVE LINE ROUTINE - 

* THIS SUBROUTINE CHECKS A CHARACTER TO DETERMINE IF THE CHARACTER 

♦ WAS RECEIVED ON AN ACTIVE LINE. IF THE CHARACTER WAS RECEIVED ON 

♦ AN INACTIVE LINE THIS ROUTINE RECORDS THE FACT THAT THE CHARACTER 

♦ WAS RECEIVED ON AN INACTIVE LINE, PREPARES AN ERROR MESSAGE FOR 

* THE CALLING ROUTINE. AND RETURNS A "FAILURE" STATUS. 
* 

R2 - THE RX CHARACTER INCLUDING ERROR FLAGS ANO LINE NUMBER. 
ACTLNS - BIT MAP OF ACTIVE DUT LINES. 

BITTBL - TABLE OF WORDS WITH BITS SET FOR FORMING BIT MAPS. 
EM9006 - LABEL AT "RX ON INACTIVE LINE" ERROR MESSGE. 
EXCNTB - BASE OF THE EXTRA CHARACTER COUTERS TABLE. 
TXRXLO - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 



* INPUTS! 

* 

* 

♦ OUTPUTS: 

* 

* 



CARRY - "SUCCESS" FLAG (SET IF NO ERROR FOUND). 

Rl - IF ERROR FOUND. ADDRESS OF ERROR MESSAGE. 

R3 - LINE NUMBER OFFSET OF PASSED IN CHARACTER. 

R4 - IF ERROR FOUND. EXPECTED DATA INDICATION FQR ERROR RPT, 

EXCNT - EXTRA CHARACTER COUNT FOR LINE (UPDATED IF ERROR). 



CALLING SEQUENCE ; 
COMMENTS: 



JSR 



PC, CKINAC 



SUBORDINATE ROUTINES CALLED: NONE. 



017150 

017150 00456V 166150 



017154 010203 

017156 000303 

017160 042 703 177760 

017164 006303 



017166 005702 
017170 100021 



017172 016301 005234 
017176 056167 002364 
017204 001013 



CKINAC: : SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE SU6RT. 



HOV 


R2,R3 


SWAB 


R3 


SIC 


dl77760,R3 


A5L 


R3 



162766 



I EXTRACT THE LINE NUMBER FROM THE PASSED IN CHARACTER ANO USE THE LINE 
; NUMBER TO FORM AN OFFSET FOR ACCESSING TABLES OF LINE VARIABLES. 

(EXTRACT THE LINE NUMBER 

» FROM THE CHARACTER WE 

I ARE COMPARING. 

;FORM OFFSET INTO WORD TABLE FROM LINE NUMBER 

i IF THE CHARACTER IN QUESTION IS NOT A VALID CHARACTER. EXIT WITH "SUCCESS". 

TST R2 iCHECK DATA. VALID BIT. 

BPL 50i (EXIT WITH SUCCESS IF CHAR IS NOT VALID. 

I IF THE TX LINE WHICH IS ASSOCIATED WITH THIS RX LINE IS AN ACTIVE LINE, 
t EXIT THE ROUTINE WITH "SUCCESS". 

MOV TXRXLB(R3),R1 jGET THE TX LINE d OFFSET FOR THIS" RX LiNt. 
BIT BITTBLCRl), ACTLNS (DETERMINE IF Tx LINE IS AN ACUvE LINE, 
BNE 50$ (EXIT ROUTINE WITH SUCCESS IF LINE IS ACTIVE. 

THE CHARACTER IN QUESTION WAS RECEIVED ON AN INACTIVE LINE. 

COUNT THIS CHARACTER AS AN EXTRA CHAR. 

SET UP ERROR INFORMATION. 

EXIT ROUTINE WITH "FAILURE" INDICAIION. 



F7 



DHU 11 FUNC TST PARTfl 
GLOBAL SlSROUTINE 
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-1 



SEQ 83 



3222 


01^206 


005263 


003242 




3223 


017212 


001002 






3224 


017214 


005365 


003242 




3225 


017220 


012701 


011233 


2$: 


3226 


017224 


012704 


100000 




3227 


017230 


000241 






3228 


017232 


000401 






322^^ 










3230 








i ♦ 


3231 








1 UE 


3232 








; SE 


3233 








J - 


3234 


017234 


000261 




50$: 


323b 










3236 


017256 






60$; 




017236 


010166 


000004 






017242 


010366 


000010 






017246 


010466 


000012 






017252 


004 736 






3237 


017254 


000207 







INC 

BNE 
DEC 
MOV 
MOV 
CLC 

BR 



EXCNTB(R3) 

EXCNTB(R3) 
*EM9006,R1 
#BIT15.R4 

60$ 



I INCREMENT THE EXTRA CHAR COUNT FOR THIS LINE 

(SKIP SETTING TO MAX VALUE IF NO OVERFLOW. 

I DECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW 

(SET UP RX ON INACTIVE LINE MESSAGE. 

iSET UP "NONE" EXPECTED DATA INDICATION. 

I CLEAR THE "SUCCESS" FLAG. 

I GO REPORT RX CHAR ON INACTIVE LINE. 



1 UE HAVE NOT FOUND A "CHAR ON INACTIVE LINE" ERROR SITUATION, 
SET THE "SUCCESS" FLAG AND EXIT THE ROUTINE. 



SEC 
PASS 



RTS 



R1,R3.R4 



PC 



MOV 
MOV 
MOV 
JSR 



(SET THE "SUCCESS" FLAG. 



iRESTORE GPRS. EXCEPT 

Rl.RlSLOTCSP) 

R3»R3SL0TCSP) 

R4,R4SL0TCSP) 

PC.SCSP)* 

iCARRY - SUCCESS FLAG (SET IF NO ERROR). 



OUTPUT GPRS. 
jPUT Rl IN 
iPUT R3 IN 
iPUT R4 IN 
; RETURN TO 



STACK SLOT. 
STACK SLOT. 
STACK SLOT. 
PREG05 SU8RT 



G7 



DHU-U FUNC TST PART4 
GLOBAL SCfBROUTINE 



3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
324 7 
3248 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3253 
3259 
3260 
3261 
3262 
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- CKTRAP - 



SEQ 84 



3263 
3264 
3265 
3266 
3267 
3268 
3269 

3270 



017256 
017256 
017262 
017266 
017270 
0172-"* 
017276 
017300 
017302 
017302 
017304 



004567 166042 

005067 162766 

011011 

005767 162760 

000261 

001401 

000241 

004736 
000207 



.SBTTL GLOBAL SUBROUTINE - CKTRAP - 



1» 
i* 

t* 

;• 
1* 
;• 
i* 
I* 
i* 
i* 
;♦ 
i* 
;♦ 
t* 

;* 

;* 
i* 



CHECK TRAP ROUTINE - 

THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 
WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATION. 
IF THE TRAP DOES NOT OCCUR. THIS ROUTINE RETURNS A SUCCESS INDICATION. 



INPUTS: 



OUTPUTS 



RO - SOURCE ADDRESS FOR MOVE. 

Rl - DESTINATION ADDRESS FOR MOVE. 

CRO) - SOURCE FOR THE MOVE. 

(Rl) - WRITTEN TO THE CONTENTS OF (RO). 

CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 

TP4FLG - NONZERO IF TRAP OCCURRED, CLEARED OTHERWISE. 



CALLING SEQUENCE: 



JSR 



PC, CKTRAP 



COMMENTS: IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS WHICH 
IS LABELED AORPTR WILL BE THE TRAP PC ADDRESS ON TH^ STACK. 

SUBORDINATE ROUTINES CALLED: NONE. 



***«****j«ij«i****<i***4>*4>4i4i*4>«4i*«4t4t**'(>*********4>**4i****«'f****'**********'***<"i*">>*'t'*4> 



CKTRAP:: SAVE 



ADRPTR: 



60*: 



CLR 
MOV 
; TST 
SEC 
BEQ 
CLC 
PASS 

RTS 



JSR 
TP4FLG 
(RO).(Rn 
TP4FLG 



60* 



PC 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 

R5,PREG05 jCALL REGISTER SAVE SUBRT. 

I CLEAR THE 004 TRAP FLAGS. 

(PERFORM THE MOVE IN QUESTION. 

(CHECK FOR OCCURENCE OF TRAP. 

I INDICATE SUCCESS. 

lEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 

I INDICATE FAILURE. 

iRESTORE GPRS. 

PC,a(SP)* ;RETU^N TO PREG05 SUBRT 



H7 



DHU-ll ruNC TST PART4 
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5^73 
3^;4 
3275 
3276 
327 7 
32 78 
3279 
3280 
3281 
3282 
3283 
3284 
3285 
3286 
3287 
3288 
3289 
3290 
3291 
3292 
3293 
3294 
3295 
3296 
3297 
3293 
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- CKTRPB - 



SEQ 85 



3299 

3300 
3301 
3302 
3303 
3304 
3305 
3506 

3307 



017306 
017306 

017312 
017316 
017320 
017324 
017326 
017330 
017332 
017332 
017334 



004567 166012 



005067 
111011 
005767 
000261 
001401 
000241 

004 736 
000207 



162736 
162730 



.SBTTL GOBAL SUBROUTINE - CKTRPB - 



1* 

;» 

;* 

;* 

i* 

1* 

;♦ 

J* 

;* 

;♦ 

J* 

t* 

1* 

I* 

J* 

J* 

J* 

;* 

I* 

1* 

;♦ 
,♦ 



- CHECK FOR TRAP - 

THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP C004 TRAP) 

WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATION 

IF A TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 



INPUTS: 



OUTPUTS; 



RO - SOURCE ADDRESS FOR MOVE 

Rl DESTINATION ADDRESS FOR MOVE 

CRO) - SOURCE FOR THE MOVE 

(Rl) - WRITEN TO THE CONTENTS OF (RO) 

CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED 

TP4FLG - NONZERO IF TRAP OCCURED, CLEARED OTHERWISE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. CKTRPB 



IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS 
WHICH IS LABELED TRPAD2 WILL BE THE TRAP PC ADDRESS ON 
THE STACK OR SOME OTHER ADDRESS WHICH WAS PLACED ON 
THE STACK BY AN UNEXPECTED TRAP. 

THIS ROUTINE PERFORMS A BYTE MOV . 



SUBORDINATE ROUTINES CALLED: 



NONE. 



;*****4t*«44i4**********4i4i4i4^****4i4t*4i****4L***4i**4L****A4i****'fc**44***4t**<»4**«4**A4L4* 



CKTRPB: 



TRPAD2: 



60$: 



SAVE 



JSR 



R5,PREG05 



tCALL REGISTER SAVE SUBRT. 



CLR 


TP4FLG 


MOVB 


{R0).CR1) 


TST 


TP4FLG 


SEC 




BEQ 


60 » 


CLC 




PASS 





i CLEAR THE 004 TRAP FLAGS 

[PERFORM THE BYTE MOVE 

(CHECK FOR OCCURENCE OF TRAP 

1 INDICATE SUCCESS 

;E;XIT WITH SUCCESS IF TRAP DID NOT OCCUR 

i INDICATE FAILURE 



RTS 



PC 



JSR 



PC.acsp)* 

t RE TURN 



jRETURN TO PREG05 SUBRT. 



17 
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^EQ 86 



5509 

3510 
5511 
351^ 
5513 
3514 
3315 
5516 
3517 
3318 
3519 
33^0 
33:'l 
3322 
3325 
352^* 
3525 
3526 
3327 
3328 
3329 
3330 
3351 
3332 
3355 
3354 
3335 
3556 
33!:7 

3338 
3339 
3340 
3341 
3342 
3343 
3344 
3345 
3346 
334 7 
3348 
3349 
3350 

3551 
3352 



017336 
017336 



017342 
017346 



017354 
017354 
017354 

017356 



004567 165762 



004767 
103002 



004510 



017 550 004767 003274 



004 736 
000207 



SBTTL GLOBAL SUBROUTINE - CLNRST - 

- CLEAN RESET OF THE DEVICE UNDER TEST - 
THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 
THE OUT'S SELF-TEST IS SKIPPED, AND THE FIFO IS PURGED OF ANr ERROR 
CODES. ETC. 

IF THE RESET DOES NOT SUCCESFULLY COMPLETE, THEN THE CARRY BIT IS 
PASSED BACK TO THE CALLING ROUTINE (CLEAR). 



INPUTS: 



OUTPUTS 



C5RA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF OUT DMA BUFFER COUNT REGISTER. 

ERRNBR - ERROR NU18ER FOR POSSIBLE ERROR REPORT . 

ERRTBL" ERRTYP.ERNBR.AND ERRMSG SET UP CORRECTLY. 

THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

ERRBLK - VALUE MAY BE DESTROYED. 

lESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



CALLING SEQUENCE: 



JSR 



PC. CLNRST 



COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 
THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

SUBORDINATE ROUTINES CALLED: DELAY .MSLGET .PUFIFO.RtSETT . 



CLNRST: : SAVE 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 (CALL REGISTER SAVE 5UBRT. 



I RESET THE DUT. 

; THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNBR THRU ERRNBR*2. 



JSR 
BCC 



PCRESETT 
60$ 



(RESET THE DUT TO A KNCUN STATE. 

jEXIT ROUTINE WTTli ABORT TEST INDICATOR. 



I ♦ 

; PURGE THE FIFO OF ERROR CODES, SAVE ANY BMr* CODES FOUND. 

JSR PC.PUFIFO ;PURGE THE FIFO. 

60$: 

PASS 

JSR 

RTS PC 



;EXIT THE "EST USING RESET? OR PUFIFC STATUS. 
jRtSTORt GFRS, PASS THE FOLLOWING INTACT: 
PCaCSPV (RETURN TO PRtG05 SUBRT. 

iCARRt BXTilF CLtAR. THEN ABORT THE TEST. 
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- CLR16W - 



SEU 07 



3554 
5355 
3356 

3356 
3559 
3360 
3361 
336^ 
3365 
3564 
3365 
3366 
336/ 
33^i6 
3369 
3570 

3371 
3372 
3373 
3374 
3375 

3376 



017360 
017360 
017364 
017370 
017372 
017574 
017376 
017376 
017400 



004567 
012701 
005020 
005301 
001375 

004 756 
000207 



165740 
000020 



.SBTTL GLOBAL SUBROUTINE - CLR16W - 

; * fr **4t4>*4************************ *************** *******«*A***««*«*44*4i**4 4-.4>44« 

(♦ - CLEAR SIXTEEN WORDS ROUTINE - 

;* THIS SUBROUTINE CLEARS 16 WORDS STARTING WITH THE SPECTFIED WORD. 

t* 

1* INPUTS: RO - ADDRESS OF THE FIRST WORD 10 CLEAR. 

i* 

* OUTPUTS: (RO) TO CR0*15) - 16 WORDS OF MEMORY ARE CLEARED TO 0. 
• 

* CALLING SEQUcNCE: JSR PC.CLR16W 

* 

* COMMENTS: 
J* 

J* SUBORDINATE ROUTINES CALLED: NONE. 

;.- *«j»*********4<*0**************************«**<^ ****************************** 

I SAVE CONTENTS OF GPRS RO THRU RS, 
JSR R5.PREG05 ;CAll REGISTER SAVE SU8RT. 

iSET THE LOOP COUNTER TQ 16. 

I CLEAR A WORD OF MEMORr. 

;COUNT THIS LOOP. 

J LOOP IF NOT 16 WORD CLEARED. 

•RESTORE GPRS 
JSR PC.aCSP)* * ;RETURN TQ PREG05 SUBRT. 



CLR16W; 


: SAVE 






MOV 


016. .Rl 


2$: 


CLR 


(RO)* 




DUG 


Rl 




BNE 


2J 


60$ J 


PASS 





RTS 



PC 
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^EQ 88 



5576 
3379 

3380 
3581 
3382 
3385 
3384 
3585 
3386 
3387 
3380 
3389 
3390 
3391 
5392 
3393 
3394 
5395 
3396 
3397 
3398 

3399 
3400 
3401 
3402 
3403 
3404 
3405 
3406 
3407 
3408 
3409 
3410 
3411 
3412 



3413 
3414 



017402 
017402 
017406 
017412 
017414 
017420 
017422 
017424 
017426 
017430 
017432 
017436 
017440 
017442 
017444 
017446 
017446 
017452 



004567 
012702 
010503 
012704 
005005 
006203 
103005 
011201 
006201 
00476 7 
050005 
005722 
005304 
001360 

010566 
004736 



.SBTTL GLOBAL SUBROUTINE - CONMAP - 

t* - CONVERT LINE BIT MAP. 

(♦ THIS SUBROUITNf. IS USED TO CONVERT A BIT MAP PASSED TO II . INTO 

:* ANOTHER LINE BIT MAP THAT IS BASED UPON THE ASSOCIATED TX/RX LINE 

;♦ NUMBER/OFFSET TABLE. 

I* 

i* INPUTS; R5 - CONTAINS THE LINE BIT MAP TO BE TRANSFORMED. 

J* TXHXLB - BASE ADDRESS OF ASSOCIATED TX/RX LINE NUMBER TABLE. 

:• 

i* OUTPUTS: R5 - CONTAINS AN A5S0SCIATED LINE BIT MAP. 

;♦ 

!* CALLING SEQUENCE: JSR PC. CONMAP 

i* 

J* COMMENTS: THE TX/RX ASSOCIATION TABLE MUST BE INITIALISED BEFORE THIS 
I* ROUTINE IS CALLED. 

J* 

J* SUBORDINATE ROUTINES CALLED: NONE. 



165716 
005234 

000020 



CONMAP: :SAVE 



001250 



000014 







J3H 




MOV 


#TXRXLB.R2 




MOV 


R5.R3 




MOV 


^^NUMLNS . R4 




CLH 


R5 


2$: 


ASR 


R3 




BCC 


4J 




MOV 


(R2),R1 




ASR 


Rl 




JSR 


PC.LINBIT 




BIS 


R0,R5 


4$; 


TST 


(R2)f 




DEC 


R4 




BNE 


2$ 


60$: 


PASS 


R5 

MOV 
JSR 



(SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SUBRT, 

(GET THE BASE ADDRESS OF THe. LINE ASSOC TABLE. 

(COPY THE BIT MAP TO BE TRANSFORMED. 

iSET MAX LINE COUNTER. 

(CLEAR ASSOCIATED LINE BIT MAP. 

i SHIFT ACTLNS BIT MAP INT BOOLEAN REGISTER. 

I SKIP SETTING ASSOCIATED LINE NUMBER BIT MAP. 

(GET ASSOCIATED LINE NUMBER OFFSET FROM TABLE. 

1 SHIFT RIGHT TO GET LINE NUMB FROM OFFSET. 

(GENERATE AN SINGLE BIT MAP FOR THIS LINE. 

(SET BIT FOR THIS LINE IN ASSOCIATED BIT MAP. 

; INCREMENT ADDRESS FOR THE NEXT LINE NUMBER. 

(DECREMENT LINE COUNT. 

(LOOP IF NOT DONE. 

(RESTORE GPRS. EXCEPT 

R5,R5SL0TCSP) (PUT R5 

PCaCSP)* (RETURN 



IN STACK SLOT. 
TO PJ*tG05 SUBRT 



01745^* 000207 



RTS 



PC 



{R5 • CONTAINS THE ASSOCIATED LINE BIT MAP. 



DHU-ll ruNC TST PARTO 
GLOBAL SUBROUTINE 



L7 



MACRO Mi200 lb -MAR -84 
- DELAY - 



09:48 PAGE 6'! 



SEQ 89 



5416 
341 ; 
'SA\& 
5419 
?420 
34^M 

34^5 

34cM 
3425 
3426 
3427 
3428 
342^ 
3430 
3431 
34 52 
3433 
3434 

3435 
3436 
3437 
3438 
3439 
3440 
3441 
3442 

344 3 
3444 
3445 



0174S6 
017456 
017462 
017464 
017470 
017472 
0174 76 
017502 
017504 
017510 
017510 
017512 



004567 
010401 
012702 
005003 
012704 
00476V 
103002 
004767 

004736 
000207 



165642 

177777 

017514 
001506 

002314 



.SBTTL GLOBAL SUBROUTINE ■ DELAY - 

J* - DELAY SUBROUTINE - 

;* THIS SUBROUTINE IS USED TO DELAY A VARIABLE NUMBER OF MILLI -SECONDS. 

;* 

I* INPUTS: R4 - CONTAINS THE NUMBER OF MS TO DELAY. 

J* MSLCNT. 

i* 

;♦ OUTPUTS: NONE. 

1* 

l» CALLING SEQUENCE: JSR PC. DELAY 

i* 

;♦ COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCL'RING. CONTROL -C3 WILL 

;* NOT BE HONORED FOR THE DURATION OF THE DELAY. 

:♦ SUBORDINATE ROUTINES CALLED: NONE. 



DELAY:: SAVE 



0175X4 177777 



60$ 



62$: 





JSR 


MOV 


R4,R1 


MOV 


0-1. R2 


CLR 


R3 


MOV 


*62i.R4 


JSR 


PC.MSLOOP 


BCC 


60$ 


JSR 


PC. OOPS 


PASS 


ICD 


RTS 


JaK 
PC 


.WORD 


-1 



;SAVE CONTENTS OF GPRS RO THRU R5 . 
R5.PREG05 iCALL REGISTER SAVE SUBRT . 
iPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

TELL MSLOOP ROUTINE TO CHECK ALL BITS. 

TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

TELl, MSLOOP TO CHECK DUMMY NON-ZERO WORD. 

DELAY THE REQULSTED OF MS. 

EXIT ROUTINE IF WE TIMED-OUT.] 

IF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 

RESTORE GPRS 
PC.5)CSP)» ' ;RETURN TO PREG05 SUBRT 



J DUMMY, NON-ZERO WORD. 
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SEQ 90 



344 7 
5448 
3449 
3450 
3451 
3452 
3453 
3454 
3455 
3456 
3457 
3458 
3459 
3460 
3461 
3462 
3463 
3464 

3465 
3466 
3467 
3468 
3469 
34 70 
3471 
3472 
3473 
34 74 
34 75 
34 76 
3477 
3476 



34 7^ 
3480 



017516 
017516 
017522 
017526 
017532 
017534 
017536 

017540 
017544 
017550 
017552 



017560 
017560 
017564 
017566 



004567 
016700 
012702 
006300 
005302 
001375 

012701 
032700 
001402 
012701 



017556 060100 



010066 
004 736 
000207 



165602 
162474 
000006 



000052 
000100 

000025 



000002 



.SBTTL GLOBAL SUBROUTINE ■ DM16B - 

■ CONVERT TO A 16 -BIT PHYSICAL ADDRESS - 
THIS ROUTINE CONVERTS KROM PAR FORM TO A 16-BIT PHYSICAL ADDRESS, 
OF ALTERNATE I'S AND O'S, 

INPUTS: DMTSTA: - CONTAINS THE ADDRESS IN PAR FORM 

OUTPUTS: RO - CONTAINS THE 16 BIT PHYSICAL ADDRESS 

CALLING SEQUENCE: JSR PC.DM16B 

COMMENTS: USED IN THE DMA ADDRESS TEST 

SUBROUTINES CALLED: NONE. 



DM16B : : SAVE 



2$ 



4$ 



MOV 
MOV 
ASL 
DEC 
BNE 

MOV 
BIT 
BEQ 
MOV 

ADD 

PASS 

RTS 



JSR 
DMTSTA, RO 
*6.R2 
RO 
R2 
2$ 

*52.R1 
#100, RO 
4$ 
ft25.Rl 



Rl.RO 
RO 

PC 



MOV 
JSR 



R5.PREGC5 ;CALL REGISTER SAVE SUBRT. 
(SHIFT THE DMA TEST ADDRESS 
iSIX PLACES LEFT . TO 
(CONVERT IT INTO A , 
116-BIT PHYSICAL ADDRESS 



iSET UP THE 6 LSB'S 
I IF BIT <Hi OF THE PHYSICAL 
jAODRESS IS CLEAR THEN BRANCH 
jOTHERWISE CORRECT THE LSB'S 

tMREGE THE LSB'S WITH THE PHY ADDR 



jRETURN WITH THE PHY ADDR. 



RO.ROSLOT(SP) 
PC.aCSP)* 



iPUT RO IN STACK SLOT. 
iRETURN TO PREG05 SUBRT. 



N7 
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34 8r 
348.^ 

5484 

3485 

3486 

3487 

3488 

3489 

3490 

3491 

349^ 

3493 

3494 

3495 

3496 

349/ 

3498 

3499 

3500 

3501 

350^ 

3503 

3504 

3505 

3506 

3507 

3508 

3509 

3510 

3511 

3512 

3513 

3514 

3515 

3516 

3517 

3518 

3519 

3520 

3521 
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SEQ 91 



3522 

3525 
3524 
3525 
3526 
352 / 
3528 
3529 
3530 
3531 
3532 
35 35 
3534 
35 35 
35 3(. 
553/ 



017570 
017570 

017574 
01/576 
017602 
017604 

01/610 
01 /612 
017620 



017624 
01/632 
017654 
017640 
0l7t46 



.SB 

t * + 
J* 

1* 

* 

♦ 
* 

* 

* 

* 
(* 
J* 

;* 
I* 

!• 

;* 



ITL GLOBAL SUBROUTINF. - DMRW - 

- READ/WRITE DATA FROM/TO CDMTSTA) - 
THIS ROUTINE READS DATA BYTES FROM OR WRITES DATA BYTES TO AN ADDR OF 
ALTERNATE I'S AND O'S . BITS 21 TO 6 OF THE ADDR ARE CONTAINED AT 
DMTSTA. THE ROUTINE APPENDS THE 6 LSB'S TO PRODUCE AN ADDR OF 
ALTERNATE I'SAND O'S. THIS ROUTINE IS CALLED FROM THE DMA ADDRESS TEST. 



INPUTS: 



OUTPUTS; 

CALLING SEQUENCE: 
COMENTS: 



RO - ADDRESS OF THE DATA TO BE WRITTEN TO COMTSTA), 

IF A WRITE IS SPECIFIED. 
Rl - ADDRESS OF THE AREA IN WHICH DATA FROM CDMTSTA), 

IS TO BE SAVED. IF A READ IS SPECIFIED. 
R3 - NUMBER OF D/'TA BYTES TO BE READ/WRITTEN 
R5 - CLEAR . SPECIFIES A READ FROM CDMTSTA) 

SET , SPECIFIES A WRITE TO (DMTSTA). 
DMTSTA - CONTAINS BITS 21 TO 6 OF THE ADDR. 
MMSRO - ADDRESS OF MEM MGT STATUS REG ffO 
M,1PRES - BIT #0 SET, INDICATES MEM MGT PRESENT 
. /R6A ^ ADDRESS OF MEM MGT PAR #6 
TP4FLG - 004 TRAP FLAGS 

DATA AT (DMTSTA) SAVED OR WRITTEN 
PAR 06 - CONTENTS SET TO CONTENTS OF DMTSTA 
TP4FLG - CLEAR IF READ/WRITE SUCCESSFUL 
SET IF FAIL. 



J5R 



PC, DMRW 



IF MEM MGT IS PRESENT THE SUBROUTINE USES (DMTSTA) 

AS THE PAGE ADDRESS . PLACING IT IN PAR db , AND CREATES 

A VIRTUAL ADDR IN THE RANGE OF PAR *6 WHICH CONTAINS 

THE SIX LSB'S. 

IF IT IS NOT PRESENT THE (DMTSTA) IS CONVERTED INTO 

THE EQUIVALENT 16 HIT PHY5ICAL ADDRESS. 



SUBORDINATE. ROUTINES CALLED: CKTRAP.DM16B . 



004567 165530 



010004 
005767 
001003 
004 767 

000416 
016/7/ 
012700 



032/6/ 
001402 
012700 
012/77 
005705 



162516 
177706 



162404 
140052 



DMRW: : SAVE 



MOV 
TST 

BNC 

JSR 



162520 6$: 



OOOOOl 162570 



140025 
OOOOOl 



162446 8$: 
10$: 



BR 

MOV 
MOV 



BIT 
BtQ 
MOV 
MOV 
TST 



JSR 

R0.R4 
MMPPF 5 
6$ 
PC.t)Ml6B 

!0J 

DMTSTA. aPAR6A 

*>140052,R0 



v^l. DMTSTA 

8$ 

<?140025.H0 

^BUO.SMMSRO 

R5 



R5,PREG05 



(CALL REGISTER SAvt SUBRT 



jSAVfc THE SOURCE ADDR 

(IF MEM MGT IS PRESENT THEN 

;JUMP ANO SET UP THE PAR <>5 

jOTHERUISE CONVERT DMTSTA INTO A 16 BIT 

iPHYSICAL ADDRESS. IN RO. 

(JUMP TO PERFORM THE MOVF 

(SET PAR 0h, 

;StT THE SIX LSB'S AND CONVEHT TO 

(A VIRTUAL ADDRESS WITHIN THF INFLUENCE 

J OF PAR «6. 

[IF BIT *0 OF DMTSTA ts CLEAR THEN 

(AVOID CHANGINCi THE I SB ' S 

iCHANGt THl LSB'S 

iFNABLt MM MU! . 

ilF A READ IS SPECIFIED THEN 



Bb 
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55Se 
5559 
554C 
5541 
5542 
5545 
5544 
5545 
554t. 
554 7 
554a 
5S4^ 
5550 

55SI 
555^ 



017650 
017652 
017654 
017656 
017662 
017664 
017666 
017670 
017672 
017674 
017 700 
017 702 
017706 
01.*706 
017710 



001402 
01000 I 
010400 
004 767 
105004 
005201 
005200 
005505 
00157X 
00576 7 
001402 
00507 7 

004 756 
000207 
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177424 



162420 
lt)2406 





BtQ 


12$ 




MOV 


RO.Rl 




MOV 


R4»R0 


12t! 


JSR 


PC.CKTRPB 




BCC 


14$ 




INC 


Ri 




INC 


RO 




DEC 


R5 




6NE 


121 


14$: 


T3T 


MMPRES 




BEQ 


16$ 




Cl.R 


aMMSRO 


16 J i 


PASS 





RTS 



PC 



JSR 



SEQ 92 



lAVOID SWAPING THE SOURCE AND DESTINATION. 

(SWAP 

(RESTORE THE ORIGINAL SOURCE FOR THE MOVE. 

(PERFORM THE BYTE MOVE. 

(EXIT IF A TRAP OCCUREO. 

lINCREMCNT THE DESTINATION ADDRESS 

I INCREMENT THE SOURCE ADDR. 

lOECREMENT THE DATA 

(REPEAT UNTIL ALL DATA READ/WRITTEN 

I IF MEM MOT IS PRESENT THEN 



(DISABLE IT. 
PC.QCSP)^ 



(RETURN TO PREG05 SUBRT. 



C6 



GUOBAl 
35Sr 

5S5a 

55b0 

35fcJ 
5564 
.n56S 
3566 
356? 
3568 
35t.9 
3570 
35 .'1 
357*? 
3573 
3574 
3575 
3576 
357? 
3578 
3579 
3580 
3581 
358^ 
3583 
3584 

3585 

3586 
358 7 
3588 
3589 
3590 
3591 
3592 
3595 
3594 
359S 
3596 



3597 



FL»Nl TSl PrtRT4 
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SEQ 95 



3598 
3599 
3600 

5601 
3602 
3605 
3604 
3605 



0177)2 
017712 
017716 



017722 
017722 
OW724 
017726 
017726 
017732 
017754 
017740 
017744 
017750 
017752 
017754 
017 760 
017764 



.SBTTL GLOBAL SUeROUTINE 



OODMA 



. TKITTTATE DHA TOaMQMTCC TnKl OnilTTMi: _ 



INITIATE DMA TRANSMISSION ROUTINE 
THIS ROUTINE WRITES THE DMA PARAMETER TO THE SPECIFIED DEVICE AND 
INITIATES THE DMA TRANSMISSION. 



INPUTS! 



OUTPUTS I 



Rl ■ LINE NUMBER ON WHICH TO INITIATE THE DMA. 

R2 START ADDRESS OF THE DMA BUFFER (16 BIT VIRTUAL). 

R3 - CHARACTER COUNT OF THE DMA BUFFER. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

lESTAT - STORAGE FOR STATES OF THE INTERRUPT ENABLE BITS. 

TXADIA - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG 01. 

TXAD2A - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG 02, 

TXBFCA - CONTAINS ADDRESS OT DMA CHARACTER COUNT REGISTER. 

CARRY - SUCCESS FLAG (SET IF 0MA_5TART FOUND CLEAR). 



OUT TBUFFAOl 
OUT TBUFFAD2 

OUT TBUFFCT 



CALLING SEQUENCE: 



JSR 



LS 16 BITS OF DMA BUFFER ADDRESS (INITIALIZED). 
MS 6 BITS OF DMA BUFFER ADDRESS (INITIALIZED). 
DMA START BIT SE T 
DMA BUFFER CHARACTER COUNT (INITIALIZED). 

PC. DODMA 



COMMENTS; THIS ROUTINE ASSUMES MEMORY MANAGEMENT IS DISABLED AND 

CLEARS THE TWO MSB OF THE DMA ADDRESS, I.E. BITS AND 1 
OF THE TBUFrA02 REG. 

SUBORDINATE ROUTINES CALLED: NONE. 



00456 7 
012704 



165406 
000200 



OODMA i: SAVE 
MOV 



0200. R4 



I SAVE CONTENTS Of GPRS RO THRU 

JSR R5,PREG05 iCALL REGISTER 

iPREPARE TO CLEAR UPPER 6 BITS 



R5. 

SAVE SU6RT. 

OF DMA BUFF 



ADR. 



WRITE THE DMA PARAMETERS OUT TO THE DUT DMA REGISTERS. 
DISABLE INTERRUPTS. 
SET UP DUT CSR INO.ADR.REG FIELD. 
WRITE THE DMA TRANSMIT CHARACTER COUNT. 

WRITE THE LEAST SIGNIFICANT 16 BITS OF THE DMA BUFFER START ADDRESS. 
WRITE THE MOST SIGNIFICANT 6 BITS OF THE ADDRESS. 

SETTING THE DMA START BIT, AND INITIATING THE DMA TRANSMISSION. 



104440 
010005 

012 700 
104441 
056701 
010177 
105777 
000241 
100411 
010577 
010277 
110477 



6$: 



GETPRI H5 



000540 

162274 
162234 
162244 



162256 

162226 
162224 



SETPRI 


0PHI07 


BIS 


lESTAT.Rl 


MOV 


Rl.WCSRA 


TSTB 


aTXAD2A 


CLC 




BMI 


60 » 


MOV 


R3.8TXBFCA 


MOV 


R2.STXAD1A 


MOVD 


R4,ttTXAD2A 



(GET THE PRESENT PROCESSOR PRIORITY. 

TRAP C»GPRI 
MOV R0,R5 

lOISABLF ALL HARDWARE INTERRUPTS. 

MOV OPRIO.*,RO 

TRAP CtSPRI 

iPREPARE FOR SETUP OF LINE NUMBER IN OUT CSR. 

(SET UP THE OUT CSR INO.ADR.REG FIFLD. 

I TEST THE OUT DMA START BIT. 

I INDICATE FAILURE IN CASE DMA. HO BIT IS SET. 

lEXlT WITH FAILLME IF DMA. HO BIT IS SET. 

I WRITE THE DMA CHARACTER COUNT. 

iWRITl ^\^ US 16 BITS OF BUFFER ADORERS. 

iWRiTt MS 6 BITS OF ADR AND START DMA TX. 



D8 



OHU-ll fUNC TST 


PART4 


MACRO Ml^OO 15 MAR- 84 09:48 PAGE 


GLOBAL Sl^BROUTINE 


- DOOHA 


3b06 017 770 




SETPRI R5 


017770 


010500 




017772 


104441 




3607 017774 


000261 


SEC 


?t.08 






5609 017 776 




60$ t PASS 


017 7 76 


004 7 J6 




3610 020000 


000207 


RTS PC 



6/-1 



JSR 



iRESrORE THE PROCESSOR PRIORITY, 



1 INDICATE SUCCESS. 



MOV 
TRAP 



R5.R0 
CJSPRI 



(RESTORE GPRS, 

PCiQCSP)* iRETURN TO PREG05 SUBRT. 

I CARRY - SUCCESS FLAG (SET IF SUCCESS). 



SEQ 94 



E8 



OHU-U KUNC rST PART4 
GLOBAL SUBROUTINF. 



Sole? 

3615 

5t>15 
3616 
3617 
3618 
3619 

3621 
362.^ 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3650 
3631 



3632 
3633 
3634 
3635 
3636 
3637 
3638 
3639 
3640 
364 X 
3642 
3643 
3644 
3645 
3646 
364 7 
3648 
3649 



3650 
3651 
3652 
3653 



020002 
020002 



020006 
020010 
020014 
020020 
020024 
020026 
020030 
020032 
020034 
020036 
020040 
020042 
020044 

020046 
020046 
020052 
020056 



OOiOOl 
012703 
016700 
012705 
0S05O0 
001006 
006305 
005201 
020103 
002772 
000241 
000401 
000261 



010166 
010566 
004736 



MACRO M1200 15-MAR-B4 09:48 PAGE 68 
- FINACT - 



StO 95 



.SBTTL GLOBAL SUBROUTINE - FINACT - 

- FIND FIRST ACTIVE LINE - 
THIS SUBROUTINF. CALCULATES THE NUMBER OF THE FIRST ACTIVE LINE THAT 
IS FOUND IN THE ACTIVE LINE BIT MAP ACTLNS. 

INPUTS: ACTLNS - CONTAINS THE ACTIVE LINE BIT MAP. 

OUTPUTS: Rl - CONTAINS THE NUMBER OF THE FIRST ACTIVE LINE. 

R5 - CONTAINS THE BIT MAP REPRESENTATION OF THE ACTIVE LINE. 
CARRY SET INDICATES SUCCESS, 



CALLING SEQUENCE; 
COMMENTS: 



JSR 



PC. FINACT 



SUBORDINATE ROUTINES CALLED: NONE. 



004567 165316 



FINACT: : SAVE 



i ♦ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 ;CALL REGISTER SAVE SU8RT. 



J FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 



l- 



000020 
162152 
000001 



2J: 



000004 
000014 



4$: 
60 J: 



CLR 


Rl 


MOV 


*NUMLNS,R3 


MOV 


ACTLNS, RO 


MOV 


01. R5 


BIT 


R5,R0 


BNE 


4» 


ASL 


R5 


INC 


Rl 


CMP 


R1.R3 


BLT 


2( 


CLC 




BR 


60$ 


SEC 




PASS 


R1.R5 




MOV 




MOV 




JSR 



MAP. 



(CLEAR THE LINE NUMBER COUNTER. 

iGET MAX LINE NUMBER. 

;GET THE ACTIVE LINE BIT 

t SET UP A LINE BIT MASK. 

(LOOK FOR AN ACTIVE LINE. 

(BRANCH TO BEGIN TEST IF A LINE HAS BEEN FOUND. 

(SHIFT THE BIT MASK FOR THE NEXT LINE. 

(INCREMENT THE LINE NUMBER COUNTER. 

(CHECK IF ALL LIf«S HA^E BEEN TRIED. 

(LOOP TO THY THE NEXT LINE. 

(CLEAR CARRY BIT. NO ACTIVE LINE FOUND. 

(EXIT WITH FAILURE. 

(SET CARRY. SUCCESS. 

(RESTORE GPRS. EXCEPT 



Rl.RlSLOTCSP) 

R5.R5SL0T(SP) 

PC.SCSP)* 

;R1 - CONTAINS 

(R5 - CONTAINS 



THE 

THE 



(PUT Rl IN STACK SLOT. 

(PUT R5 IN STACK SLOT. 

(RETURN TO PREG05 SL^RT 
NUMBER OF FIRST ACTIVE LINE. 
BIT MAP OF THE ACTIVE LINE. 



020060 000207 



RTS 



PC 



(CARRY - SET INDICATES SUCCESS. 



F8 
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SEQ 96 



3655 
5656 
3657 
3658 
3659 
36t»0 
3661 
366;> 
3663 
3664 
3665 
3666 
3667 
3668 
3669 
3670 
3671 
3672 
3673 
3674 
3675 
3676 
3677 
3678 
3679 
3680 
3681 
3682 
3683 
3684 
3685 
3686 
3687 
3688 
3689 
3690 
3691 
3692 
3693 
3694 
3695 

3696 
3697 
3698 
3699 
3700 
3701 
3702 
3703 
3704 
3705 
3706 
370/ 
3708 
3709 
3710 



SBTTL GLOBAL SUBROUTINE - FRPSUP - 

- FRAMING AND PARITY ERROR TRANSMISSION/RECEPTION SET-UP - 

THIS ROUTINE IS USED TO INITIALISE BOTH THE OUT AND THE 
TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
STATE, PRIOR TO A FRAMING OR PARITY ERROR DETECTION AND 
REPORTING TEST. 



INPUTS I 



OUTPUTS: 



RO - LPR CONTENTS FOR LINES IN THE BIT MAP IN GPR4. 

Rl - LPR CONTENTS FOR LINES NOT IN THE BIT MAP IN GPR4. 

R2 - START ADDRESS OF DATA PATTERN TO TRANSMIT. 

R3 - LENGTH OF THE DATA PATTERN TO TX. 

R4 - LOCAL LINE GROUP BIT HAP. 

ACTLNS - CONTAINS A BIT MAP QF ALL CURRENTLY ACTIVE LINES. 

LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODE SELECTED. 

CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 

THE CONTENTS OF THE TXRCB ARE DESTROYED. 

THE INDIRECT ADDRESS FIELD OF THE OUT CSR MAY BE DESTROYED. 

THE DUT'S LPR'S AND LNC'S MAY BE MODIFIED. 

THE FOLLOWING POINTERS AND COUNTERS ARE INITIALlSEDj 

CHCNT . CHR TOT , OPENO , DPLEN , EXCNT , RXCNT » RXDONF . RXPTR , TXCNT , 

TXDONF.TXPTR.TXRXL. 



CALLING SEQUENCE: 



JSR 



PC, FRPSUP 



COMMENTS: THIS ROUTINE SHOULD BE CALLED TWICE DURING THE TESTING OF 
THE FRAMING AND PARITY ERROR DETECTION AND REPORTING TEST, 
SO THAT BOTH LINE GROUPS ARE TESTED ON TRANSMISSION AND 
RECEPTION. 

JSR PC, FRPSUP I 00 SET-UP. 

EXECUTE TEST FOR THE ABOVE SET-UP. 

COMPLEMENT THE LINE GROUP BIT MAP. 

JSR PC, FRPSUP (DO SET UP AGAIN. 

EXECUTE TEST AGAIN. 

SUBORDINATE ROUTINES CALLED: TXRINI. 



020062 

020062 
020066 
020072 



020076 
020102 
020106 
020112 
020114 
020116 
020122 
020126 
020130 



004567 165236 
010067 000230 
0l0ir>7 000226 



FRPSUP: : SAVE 

MOV 
MOV 



(SAVE THE CONTENTS OF THE GPR'S. 
JSR R5,PREG05 tCALL REGISTER SAVE SUBRT 
RO,?Oi (SAVE LPR PARAMETER FOR LINE TX. 

R1.72$ I SAVE LPR PARAMETER FOR LINE RX. 



010067 
012700 
012720 
010220 
010320 
012720 
016710 
005104 
040420 



1C3020 
005124 
000004 



00000 I 
162044 



SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO INITIALISE THE 
ACTIVE LINES IN THE BIT MAP PASSED INTO THIS ROUTINE, 



MOV RO,CBB 

MOV *CBB*2,R0 

MOV *4,(R0)* 

MOV R2,(R0)* 

MOV R5.(R0)* 

MOV <H.CR0)» 

MOV ACTLNS. (RO) 

COM R4 

BIC R4.(R0)* 



C.BLK. 
CNTRL BLK 



I SET CONTENTS OF LPR PARAMS IN JX/^X 

tGET ADDRESS OF THE NEXT WORD IN THE 

iLNCTRL PARAMETER, ENABLE RECEIVERS. 

(START ADDRESS OF DATA PATTERN. 

iSET DATA PATTERN LENGTH. 

(NUMBER OF DATA PATTERNS TO TRANSMIT. 

(BIT MAP OF LINES TO INITIALISE. 

(GENERATE A BIT MAP OF ACTIVE LINES IN GRPl. 

(CLEAR THE UNWANTED LINES » 



QHy-U FUNC TST P 
GLOBAL SUBROUTINE 



PART4 



G8 
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SEQ 97 



3711 


020132 


116720 


162036 


3712 


020136 


005200 




3713 


020140 


012710 


000001 


3714 








3715 








3716 








3717 








3718 








3719 


020144 


004767 


005534 


3720 








3721 








3722 








3723 


020150 


012700 


003122 


3724 


020154 


010120 




3725 


020156 


062700 


000010 


3726 


020162 


016710 


162004 


3727 


020166 


005104 




3726 


020170 


040410 




5729 








3730 








3731 








3732 








3733 


020172 


004767 


005506 


3734 








3735 








3736 








3737 








3738 








3739 








3740 








3741 








3742 


020176 


012701 


177777 


3743 


020202 


016702 


161764 


3744 


020206 


005101 




3745 


020210 


005102 




3746 


020212 


040102 




3747 


020214 


040402 




3748 


020216 


010267 


162712 


3749 


020222 


005067 


162704 


3750 


020226 


016767 


000072 


3751 


020234 


004767 


005444 


3752 








3753 








3754 








3755 


020240 


016702 


161726 


3756 


020244 


005102 




3757 


020246 


040102 




3758 


020250 


005104 




3759 


020252 


040402 




3760 


020254 


010267 


162654 


3761 


020260 


016767 


000036 


3762 


020266 


004767 


005412 


3765 








3 764 








3 765 








3 766 








3707 









MOVB LOPBCK.CRO)* 

INC RO 

MOV fll.CRO) 



(SET LOOPBACK MODE.STAGGARED. 

I INCREMENT ADDRESS TO GET NEXT WORD IN TABLE. 

(SET AMMOUNT OF OFFSET FOR EACH TX START. 



1 * 
* 



INITIALISE THE OUT AND THE ASSOCIATED POINTERS AND COUNTERS » TO THE STATE 
DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 



JSR PC.TXRINI ; INITIALISE OUT. 
SET UP CONTROL BLOCK FOR LINES IN GROUP 2. 



\ - 



MOV ffCBB.RO 

MOV R1,(R0)» 

ADO #10,R0 

MOV ACTLNS.CRO) 

COM R4 

BIC R4,(R0) 



I GET START ADDRESS OF CONTROL BLOCK. 

;SET LPR PARAMETER FOR RX LINES. 

(SELECT THE ADDRESS OF THE LINE BIT MAP IN C.B 

iBIT MAP OF LINES TO INITIALISE. 

(GENERATE A BIT MAP OF LINES IN GRP 2. 

:CLEAR THE UNWANTED LINES. 



INITIALISE THE OUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 



JSR 



PC.TXRINI 



J INITIALISE DUT. 



J SET-UP THE REQUIRED LPR PARAMETERS NEEDED FOR THE CORRECT RECEPTION OF DATA 
( ON ASSOCIATED IN -ACTIVE LINES. 



i *■ 



t INITIALISE LPR PARAMETERS FOR INACTIVE LINES T.N GROUP 2 



162666 



; ♦ 



t - 



162634 



MOV 


^MIAPLNS.Rl 


MOV 


ACTLNS.R2 


COM 


Rl 


COM 


R2 


BIC 


R1,R2 


BIC 


R4,R2 


MOV 


R2.CBMAPA 


CLR 


CBOPNA 


MOV 


72$,CBLPRA 


JSR 


PC.TXRINI 


ALISE 


LPR PARAMETEI 


MOV 


ACTLNS,R2 


COM 


R2 


BIC 


RI.R2 


COM 


R4 


BIC 


R4.R2 


MOV 


R2.CBMAPA 


MOV 


70$.CBLPRA 


JSR 


PC.TXRINI 



I SET UP BIT MAP CORRESPONDING TO ALL LINES 
jGET THE ACTIVE CTX) LINE BIT MAP. 
iGENERATE A BIT MAP OF NONE EXISTANT LINES 
(GENERATE A BIT MAP OF INACTIVE LINES. 
(CLEAR ANY "NONE EXISTANT" INACTIVE LINES. 

(SET UP BIT MAP IN CONTROL 3L0CK. 
(CLEAR REPEAT TX COUNT IN CONTROL BLOCK. 
(SET-UP COMPLEMENTARY LPR PARM. 
(INITIALISE INACTIVE LINES. 



(GET THE ACTIVE CTX) LINE BIT MAP. 
(GENERATE A BIT MAP OF INACTIVE LINES. 
(CLEAR ANY NONE EXISTANT INACTIVE LINES, 

(ONLY PASS LGRP2 ASSOCIATED LINE BIT MAP. 
iSET-UP BIT MAP IN CONTROL BLOCK. 
(SET UP COMPLAMENTARY LPR PARAM FOR LGRPl 
(INITIALISE INACTIVE LINES IN LGRPl. 



( * 

( DISABLE RECEIVERS ON ALL LINES TO ENSL«E THAT ONLY THE RECEIVERS O'i 
i ASSOCIATED ACTIVE (TX) LINES ARE ENABLED. C STAGGARED LOOPBACK) 
( RE-ENABLE RECEPTION ON THE CORRECT ASSOCIATED LINES. 
i - 



THE 



BLoeiL 



m 



ou 



TST PART4 
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H8 
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- frpSup - 



SEQ 98 



5 768 
5769 

3770 
3771 
5772 
5773 
37 74 
3775 
3776 
3777 

3778 

37 79 
3780 
3781 



020272 
020276 



020302 
020306 
020312 

020316 
020516 
020320 
020322 
020324 



012705 
004 767 



016705 
004767 
004 767 



004 736 
000207 
000000 
000000 



177777 
004002 



161664 
177070 
004062 



MOV *MAPLN5,R5 
JSR PC.RXOSBL 



i SET -UP BIT MAP rOR ALL LINES. 
(DISABLE RX ON ALL LINES. 



ENABLE RECEIVERS ON ASSOCIATED (RX) LINES. 



60$: 



70$: 
72$: 



MOV 

JSR 

jsn 

PASS 

RTS 

.WORD 

.WORD 



ACTLNS.RS 
PC.CONMAP 
PC.RXENBL 



JSR 



PC 







iGET ACTIVE (TX) LINE BIT MAP. 

(GENERATE AN ASSOCIATED (RX) LINE BIT MAP. 

(ENABLE RECEIVERS ON ASSOCIATED LINES. 



I RESTORE GRP'S. 
PC,a(SP)» 



{RETURN TO PREG05 SUBRT 



(LOCAL STORAGE Of LPR PARAMETER TX. 
(LOCAL STORAGE OF LPR PARAMETER RX. 



18 



DHU-11 TUNC TST PART4 
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?78J 
5784 

3785 
3786 
3787 

3788 
3789 
3 790 
3791 
3 792 
3793 
3794 
3 79S 
3 796 
3797 

3798 
3 790 

3800 
3801 
3802 
3803 

3804 
3805 
3806 
3807 
3808 
3809 



MACRO M1200 15-MAR-84 09;48 PAGE 70 
- GETBOR - 



5810 
3811 
3812 
3815 
3«14 
3815 
3816 
3817 

3818 
3819 
3820 
3821 
3822 
382? 
3824 
382^j 

382; 
3828 



020326 
020526 
020332 



020356 
020344 
020344 
020346 
020350 
020352 
020354 
020356 
020360 
020362 
020364 
020364 



020370 
020374 

020400 
020402 
020404 
020406 

020410 
0204 12 



020414 
020414 



004567 
016705 



012701 
012703 

02024 3 
001416 
005301 
001374 

02024 3 
001412 



164772 
161672 



012767 002260 161664 

104443 
000406 
002230 
000052 
010020 
177777 
000000 
113000 

016702 161640 



000017 
002464 



.SBTTL GLOBAL SUBROUTINE - GETBOR - 

J* - GET BAUORATE SUBROUTINE - 

J* THIS ROUTINE REQUESTS A BAUORATE INPUT FROM THE OPERATOR. THIS 
t* BAUORATE IS LOOKED UP IN A TABLE TO GIVE THE LPR BAUORATE FIELD 
i» VALUE WHICH IS ASSOCIATED WITH THAT BAUORATE. 
i* 

I* INPUTS: BDRMSG - LABEL AT THE BAUORATE PROMPT MESSAGE. 
i* BRTBLE - LABEL AFTER END OF THE BAUORATE TABLE. 

J* UBRFMT - LABEL AT THE UNSUPPORTED BAUORATE MESSAGE. 

;* 

;* OUTPUTS: Rl - BAUORATE CODE IN LS 4 BITS. 
;* 

I* CALLING SEQUENCE: JSR PC, GETBOR 
* 

* COMMENTS: 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



GETBOR:: SAVE 


;SAVE CONTENTS OF GPRS RO THRU R5. 




JSR 


R5,PREG05 :CALL REGISTER SAVE SU6RT. 


MOV GMANWD,R5 


iSAVE THE GMAINIX VALUE. 




! PROMPT THE OPERATOR: "MODEM 


BAUORATE IN BPS: (0) 1200 ?" 




2*: MOV «1200. .GMANWO 


; SET UP DEFAULT VALUE TO 1200 


BAUD. 


GMANID BDRMSG , GMANWO 


0»177777. 0.38400. , lES 






TRAP 


CJGMAN 




BR 


10000$ 




.WORD 


GMANWO 




.WORD 


T$COOE 




.WORD 


BDRMSG 




.WORD 


177777 




.WORD 


TJLOLIM 




.WORD 


TSHILIM 



MOV 



GMANWD.R2 



100005: 



ATTEMPT TO LOOK THE VALUE UP IN THE BAUORATE TABLE. 



I - 



4* 



MOV <>15..R1 

MOV «BRTRl.E,R3 

CMP R2. (R3") 

BEU 60$ 

DEC HI 

BNF 4 i 

CMP R2, -CR3) 

BEQ 60$ 



J INITIALIZE BA'JORATE CODE TO HIGHEST BAUORATE. 
I INITIALISE BAUORATE POINTER. 

[COMPARE BAUORATE WITH A TABL^: ENTRt. 

iBAUORATES COM^^ARE? ^ES. EXIT WITH COQt. . 

iNO, SET BAUORATE CODE TO NEXT LOWER BAUORATE. 
I DONE? NO, LOOP. 

jCHECK IF LA^",T BAUORATf MATCHES. 
jBAUORATES MATCH? rES. tXiT WITH CODE, 



010246 



i * 

I REPORT "NNNNN IS NOT A SUPPORTED BAUDRATt, INTER ANOTHER OH CTRL C 

PRINTf dUBRFMT .R2 



SEQ 99 



^SP"^ 



DHUll FX^NC TST PART4 
GLOBAL SUBROUTINE 



38?^ 



5833 



0^0416 

o^o42^ 

020426 
020430 
020432 
020436 

020440 

020444 
020444 
02C4bO 
020452 



012746 
012746 
010600 
104417 
062706 
000737 



J8 



MACRO M1200 15-MAR-64 09;48 PAGE 70-1 
- GtTBDR - 

00 7722 
000002 



000006 



010567 161564 

010166 000004 
004 '36 
000207 



BR 2$ 

60$: MOV R5.GMANWD 

PASS Rl 

MOV 
JSR 

RTS PC 



jLOOP TO GET ANOTHER BAUORATE. 



SEQ 100 



MOV OiJBRFMT, -CSP) 

MOV <^2, -CSP) 

MOV SI^.RO 

TRAP CJPNTF 

ADO #6.SP 



iRESTORE THE GMANIX PARAMETER VALUE. 
jRESTORE GPRS, EXCEPT THE FOLLOWING: 
Rl.RlSLOT(SP) jPUT Rl IN STACK SLOT. 

PC.aCSP)^ jRETURN TO PREG05 SUBRT 

J Rl - BAUORATE CODE. 
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MACRO Ml^OO 15MAR-84 09:48 PAGE 71 
- GETCHR - 



SEQ 101 



3835 
3856 
3857 
3858 
583<5 
3840 
5841 
584.^ 
384 5 
3844 
3845 
584fc 
384 7 
5848 
584<i 
38^0 
5851 
585J? 
5855 
5854 
3855 
3856 
5857 
3858 
3859 
3860 
3861 

386^ 
5865 
5864 
5865 
3866 
5867 
3868 
3869 
5870 
3871 
38 72 

38:'; 

5874 
3875 
5876 
3877 



58/8 
58/'-) 
3860 



020454 
030454 
020460 
020462 
020464 
020470 
0204 72 
0204 76 
020500 
020502 
020506 
020510 
020514 

020520 
020524 

020526 
020526 
020532 



004567 
005000 
005002 
005767 
001416 
016704 
011402 
005024 
020427 
103402 
012704 
010467 

005567 
000261 



010266 
004 736 



INPUTS; 



.SBTTL GLOBAL SUBROUTINE - GETCHR - 

♦ - GET A CHARACTER FROM THE RX BUFFER ROUTINE - 

♦ THIS SUBROUTINE GETS A CHARACTER FROM THE RX BUFFER WHICH IS IN THE 

♦ HOST SYSTEM MEMORY. IF THE BUFFER IS EMPTY UPON ENTRY OF THIS ROUTINE 

♦ THIS ROUTINE RETURNS A NULL CHARACTER WITH DATA. VALID CLEAR AND A 

♦ BUFFER EMPTY INDICATION. 
* 
* 

* 

* 
* 
* 

* 

;♦ 

• * 



RXBCNT 
RXBENO 
RXBETX 
RXBOPT 
RXBSTA 



RX BUFFER CHARACTER COUNT. 

LABEL AFTER END OF THE RX BUFFER AREA IN MEMORY. 
EQUATED TO RX BUFFER LEVEL AT WHICH TO ENABLE TX. 
POINTER TO NEXT AVAILABLE INPUT SLOT OF RX BUFFER 
LABEL AT START OF RX BUFFER AREA IN MEMORY. 



OUTPUTS: 



R2 - CHARACTER WHICH IS READ FROM THE BUFFER. 

RXBOPT - UPDATED TO POINT TO NEXT INPUT SLOT OF RX BUFFER. 

RXBCNT - RX BUFFER CHARACTER COUNT (UPDATED). 

CARRY - "SUCCESS- FLAG (SET IF BUFFER IS NOT EMPTY ON ENTRY) 



CALLING SEQUENCE; 
COMMENTS: 



JSR 



PC, GETCHR 



SUBORDINATE ROUTINES CALLED: NONE. 



164644 

162226 
162214 

003120 

002720 
162172 

162172 
000006 



GETCHR: : SAVE 



2$: 



60$: 





JSR 


CLR 


RO 


CLR 


R2 


TST 


RXBCNT 


BEQ 


60$ 


MOV 


RXBOPT. R4 


MOV 


CR4),R2 


CLR 


(R4)* 


CMP 


R4.0RXBEND 


BLO 


2$ 


MOV 


*RXBSTA.R4 


MOV 


R4, RXBOPT 


DEC 


RXBCNT 


SEC 





PASS 



020534 00020/ 



R2 



PC 



MOV 
JSR 



iSAVE CONTENTS OF GPRS RO THRU R5. 

R5,PREG05 (CALL REGISTER SAVE SU6RT. 

(CLEAR THE "RE-ENABLE" TX FLAG CSU8RTN OUTPUT), 

I GET NL^_L CHAR IN CASE BUFFER IS EMPTY. 

(CHECK FOR RX DUFFER EMPTY. CLEAR CARRY, 

;EXIT THE ROUTINE IF BUFFER IS EMPTY. 

J GET THE BUFFER OUTPUT POINTER. 

iGET A CHARACTER FROM THE BUFFER. 

J DELETE THE READ CHARACTER FROM THE BUFFER. 

J CHECK IF POINTER SHOULD WRAP AROUND. 

I SKIP WRAPAROUND IF POINTER IS NOT AT END, 

(WRAP INPUT POINTER AROUND. 

jUPOATE THE OUTPUT POINTER STORAGE. 

J REMOVE THIS CHAR FROM THE BUFFER COUNT. 
iSET SUCCESS FLAG. BUFFER WAS NOT EMPTY. 

(RESTORE GPRS, EXCEPT 

R2.R2SL0T(SP) ;PUT R2 IN STACK SLOT. 

PC.SCSP)* I RETURN TO PREG05 SL«RT 

(R2 - CONTAINS THE CHARACTER READ FROM BUFFER. 
tCARRY -"SUCCESS" FLAG, SET IF BUFFER NOT EMPTV. 



L8 



DHUU FUNC TST 


PART4 


MACRO r 


GLOBAL. fAJBROUTINE 




sm? 






?883 






3884 






3885 






3886 






388 7 






3888 






338^1 






38^0 






3691 






389? 






3895 






3894 






3895 






3896 






3897 






3898 






3899 






3900 






3901 020536 






020536 


004567 


164562 


3902 020542 


000301 




3903 020544 


042701 


177400 


3904 020550 


010102 




3905 020552 


042701 


000360 


3906 020556 


006202 




3907 020560 


006202 




3908 020562 


006202 




3909 020564 


006202 




3910 020566 


020102 




3911 020570 


101401 




3912 020572 


010201 




3913 020574 


116102 


005214 


3914 020600 


042702 


177400 


3915 020604 


010267 


161436 


3916 






3917 020610 






020610 


004736 




3918 0206X2 


000207 





M1200 15 MAR -84 
- GETTIM - 



09:48 PAGE 72 



StQ 102 



SBTTL GLOBAL SUBROUTINE - GETTIM - 



- GET TIME-OUT VALUE BASED ON MINIMUM BAUDRATE ROUTINE - 
THIS SUBROUTINE GETS THE NECESSARY TIME-OUT VALUE TO VERIFY THAT ALL 
CHARS HAVE BEEN RECEIVED AT THE COMPLETION OF THE TX/RX OK A DATA 
PATTERN. THIS USES THE SLOWEST 3AUDRATE UHICH IS SPECIFIED IN THE 
PASSED IN OUT LPR CONTENTS TO CALCULATE THIS TIME-OUT VALUE. 



INPUTS: 



Rl - OUT LPR CONTENTS. 



OUTPUTS: RXTOUT - TIME-OUT VALUE FOR WAITING FOR LAST RX CHAR. 
CALLING SEQUENCE: JSR PC, GETTIM 



COMMENTS: 



SUBORDINATE ROUTINES CALLED: NONE. 



GETTIM: : SAVE 



SWAB 
BIC 
MOV 
BIC 
ASR 
ASR 
ASR 
ASR 
CMP 
BLOS 
MOV 
MOVB 
BIC 
MOV 



2$: 



60 J: 



JSR 
Rl 

#177400. Rl 
R1.R2 
*360,R1 
R2 
R2 
R2 
R2 

R1.R2 
2i 

R2 Rl 

fr6tbl(ri),R2 

*>177400.R2 
R2. RXTOUT 



I SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 tCALL REGISTER SAVE SUBRT. 

I PUT THE BAUD RATE FIELDS IN THE LOW BYTE. 

iCLFAR STOP, PARITY, AND CHAR FIELDS, 

tCOPY BAUD RATE FIELDS. 

(SELECT RX BAUD RATE FIELD ONLY. 

: SHIFT TX BAUD RATE FIELD 

i TO OCCUPY THE LOW FOUR BYTES. 

I 

(CHECK IF SAME BAUD RATE IN EACH FIELD. 
(BRANCH IF RX BAUD RATE IS LOWER OR SAME. 
;TX BAUD RATE IS THE SLOWER OF THE TWO. 
(GET PROPORTIONAL DELAY FROM TABLE. 
(CLEAR UPPER BYTE BECAUSE OF SIGN EXTENSION 
iLOAD THE RX TIME-OUT VARIABLE. 



PASS 
RTS 



PC 



JSR 



(RESTORt GPRS. 

pc.acsp)* 



(RETURN TO PREG05 SUBRT. 



m 
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MACRO M1200 15 -MAR -84 09:48 PAGE 75 
- INIDMA - 



SEQ 103 



3920 
3921 
3922 
3925 
3924 
3925 
3926 
3927 
3928 
3929 
3930 
3931 
3932 
3935 
3954 
3935 
3936 
3937 
3938 
3939 
3940 
3941 
3942 
3945 
3944 
3945 
3946 
3947 
3948 
3949 
3950 
3951 

3952 
3953 
3954 
3955 
3956 
3957 
3958 
3959 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
3968 
3969 
39/0 
39/1 
39 72 
39 75 
39 74 
3975 



020614 
020614 
020620 



004567 
016705 



164504 
161346 



020624 005001 



020626 
020630 
020632 
020636 
020640 



010104 

006304 

016402 002364 

030205 

001414 



020642 
020646 



016403 
016402 



003202 
003342 



SBTTL GLOBAL SUBROUTINE - INIDMA - 



!* 

i* 
i* 
; A 

; ♦ 

J* 
J* 
i* 

;* 
;♦ 
i* 
i* 
;• 
;* 
i* 
i* 
J* 
t* 
J* 
J* 

I* 
I* 
i* 

;* 
i* 
:* 

! * 
:♦ 



- INITIATE DMA TRANSMISSIONS ROUTINE ■• 
TPIS ROUTINE IS USED TO INITIATE DMA MODE TRANSMISSION. IT ScNOS 
THE INITIAL DMA BUFFER ON EACH ACTIVE LINE TO CAUSE FUTURE TX 
INTERRUPTS WHICH WILL CONTINUE THE TRANSMISSION IF MORE THAN ONF 
BUFFER IS TO BE SENT. 



INPUTS: 



ACTLNS - ACTIV'-: LINES BIT MAP. 

BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT SET. 

CSRA - CONTAINS THE ADDRESS OF , HE OUT CSR. 

DPENOB - BASE OF THE DATA PATTERN END TABLE (ENTRY PER LINE). 

DPLEN6 - BASE OF THE DATA PATTERN LENGTH TABLE. 

lESTAT - PRESERVED STATES OF THE OUT INTERRUPT ENABLE BITS. 

NUMLNS - EQUATED TO NUMBER OF LINES ON A DUT . 

TXCNTB - LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE. 

TXPTRB - LABEL AT BASE OF THE TX DATA PATTERN POINTERS TABLE. 



OUTPUTS: 



CSR - DUT CSR IND.ADR.REG FIELD 
<<<<<<<<<<<<<<<<<< ADO COMMENTS 



IS DESTROYED. 
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 



TXCNTX 
TXINTF 



COUNTERS INCREMENTED FOR 
TX INT FLAGS C8IT SET IF 



LINES ON WHICH CHARS SENT. 
DMA. HO FOUND SET ON LINE). 



CALLING SEQUENCE: 



JSR 



PC, INIDMA 



COMMENTS: THIS ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTERN SHOULD BE 
TRANSMITTED ON EACH ACTIVF LINE. 
INTERRUPTS MUST BE DISABLED WHEN CALLING THIS ROUTINE. 

SUBORDINATE ROUTINES CALLED: DOOMA. 



INIDMA:: SAVE 
MOV 



jsn 

ACTLNS, R5 



(SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 ;CALL REGISTER SAVE SUBRT, 
jGET THE ACTIVE LINES BIT MAP. 



SET UP LOOP WHICH HANDLES ONE LINE PER ITERATION. 



CLR 



Rl 



(CLEAR THE LINE NUMBER COUNTER 



GET A BIT MAP OF THE StLtCTEO LINE. 

IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE, 



2J: 



MOV R1,R4 

ASL R4 

MOV BITTBL(R4).R2 

BIT RP,R5 

BEQ 10$ 



i CALCULATE AN OFFSET TO THE PROPER LINF 
t ENTRY IN A WORD TABLE (LINE TIMES 2). 
I GET A BIT MAP FOR THIS LINE. 
(TEST THE ACTIVE LINES BIT f QU THIS LINE. 
(DON'T TX ON THIS LINE ' IT IS NOT ACTIVE 



LINF 15 ACTIVE. 

INITIATE DMA ON 

GET THE DATA 



THIS LINE. 
PATTERN LENGTH 



MOV 0PLENB(R4).R3 
MOV TXPTRB(R4).R2 



fOR THIS LINE. 

jGET DATA PATTERN LENGTH FOR THIS LINf . 
{PREPARE TO PASS DATA PATTERN ADR TO DODMA RTN 



WRITE DMA PARAMETERS TO THE DUT. 



H'J-ll FUNC TST 


PART 4 


lobAl subroutine 


5976 


020652 


004767 


3977 


020656 


103403 


39 ?8 






39 79 






5980 






3981 


020660 


050567 


3982 


020664 


000402 


3983 






3984 






39B5 






3986 


020666 


060364 


3967 






3988 






3989 






3990 


020672 


005201 


3991 


020674 


020127 


3992 


020700 


002752 


3993 






3994 


020702 






020702 


004736 


3995 


020704 


000207 



N8 



MACRO M1200 15-MAR-84 09:48 
- INIDMA - 



177034 



161400 



003502 



00002C 



JSR 
BCS 



PAGE 73-1 



PC.DODMA 
6J 



I SKIP ERROR IF* DODMA WAS SUCCESSFUL. 



i SET THE PROPER BIT OF THE TX INTERRUPT FLAGS TO INDICATE THE LINE ERROR. 



BIS 
BR 



RS.TXINTF 
10* 



(INDICATE THE ERROR. 

I SKIP UPDATING POINTERS AND COUNTERS. 



UPDATE THE TX CHARACTER COUNT FOR THIS LINE. 
6*: ADD H3,TXCNTB(R4) .-ADD THE DATA PATTERN LENGTH TO TX CHAR COUNT. 
: INCREMENT LINE COUNTER, GOTO NEXT LINE IF NOT DONE. 
10$: 



60$: 



INC 
CMP 
BLT 

PASS 

RTS 



Rl 

Rl.ttNUMLNS 

2J 



[INCREMENT THE LINE COUNTER. 

iCOMPARE THE LINE COUNTER WITH NUMBER OF LINES. 

jLOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 



PC 



JSR 



{RESTORE GPRS. 
PC.a(SP)* 



SEG 104 



[RETURN TO PREG05 SUURT. 



B9 
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3^97 

4000 
4001 
400.^ 
4005 
4004 
4005 
400^ 
400' 
4008 
400^ 
4010 
4011 

4cl^ 

4015 
4014 
4015 
4016 
4017 
4018 
4019 
4020 
4021 



HACRO M1200 15-MAR-84 
- UINBIT ■ 
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SEQ 105 



4022 
4025 
4024 
4025 



4026 



020706 
020706 
020/12 
020716 
020720 
020724 
020724 
020 750 
020732 



.SBTTL GLOBAL SUBROUTIhC 



LIN6IT 



• LINE NUMBER TO BIT MAP CONVERSION SUBROUTINE - 
THIS SUBROUTINE IS USED TO GENERATE A BIT MAP (ONE BIT OF 16 SET) 
BASED ON A LINE NUMBER (RANGEt I TO 16). ONLY THE LS 4 BITS OF THE 
LINE NUMBER WORD ARE USED. THE OTHERS ARE MASKED OUT (SO UNMASKED 
MSBYTES OF DUT CSRS CAN BE PASSED TO THIS ROUTINE WITHOUT ERROR). 



INPUTS! 



OUTPUTS: 



Rl - LINE NUMBER (ONLY LS 4 
BITTBL - BASE LABEL Of A 16 



BITS USED. OTHERS 
WORD BIT TABLE. 



DISREGARDED). 



RO 



BIT MAP, BIT CORRESPONDING TO LINE NUMBER IS SET 
IF LINE NUMBER IS 3, THEN BIT3 IS SET, ETC.. 



CALLING SEQUENCE! 



JSR 



PC.LINBIT 



COMMENTS: 



NO CHECKING IS PERFORMED TO VERIFY THAT THE LINE NUMBER IS 
A LEGAL LINE NUMBER FOR THE OUT (IE - LESS THAN NUMLNS). 



NOTEi THE LINE NUMBER IS NOT DESTROYED OF ALTERED, 
ROUTINE CAN BE USED EASILY IN LOOPS, 



SO THIS 



SUBORDINATE ROUTINES CALLED: NONE. 



I 



004567 

042701 
006501 
016100 

010066 
004 ;56 
000207 



164412 

177760 

002564 

oooooa 



LINBIT; ! SAVE 



60 J; 





JSR 


BIC 


#177760, Rl 


ASL 


Rl 


MOV 


BITTBLCRD.RO 


PASS 


RO 




MOV 




JSR 


RTS 


PC 



iSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PHEG05 iCALL REGISTER SAVE SUBRT, 
iMASK OUT ALL BUT 4 LSBITS OF THE LINE 0. 
iMaTIPLt LINE BY 2 TO GET WORD TABLE OFFSET. 
iGET THE SINGLE BIT BIT MAP. 
iRESTORE GPRS, EXCEPT THE FOLLOWING. 
RO.ROSIOT(SP) (PUT RO IN STACK '^LOT, 

PC.W(SP)* iRETURN TO PREG05 SUBRT, 

|R0 ■ BIT MAP WITH LINE OIT SET, 



cy 



BWbAi^. f>H&6oiflNl'^^''' "'^^^^ "M^^HoD^&f^"'^^ «•» °^'^« ^'^^*^ ^^ 



"^EQ 106 



40.^8 
40J^ 
4050 
4051 
405J 
405J 
4054 
405S 
4056 
4057 
4058 
4059 
4040 
4041 
404 c^ 
4045 
4044 

4onr^ 

4046 
4047 
4048 
4049 
4050 
4051 
405^ 
4055 
4054 
4055 
4056 
405? 
4058 

4059 
4060 
4061 
4062 
4065 
4064 
4065 
4066 
4067 
4066 
4069 
4070 
4071 
40 72 
4075 
40 M 
4075 
4076 
4077 
40/8 
40 79 
4080 
4081 
408^ 
4083 



0?0734 
020754 
020740 
020744 
020750 
020754 



020760 
020764 
020770 
C20772 
020774 
021000 
021002 
021004 
021010 
021014 
021020 
021022 



004567 
005067 
005067 

005067 
005067 



010167 
012701 
005201 
005201 
012721 
010221 
010521 
012721 
016721 
112721 
005201 
012711 



.SBTTL GLOBAL SUBROUTINE - MODSUP - 

- MODEM LOOPBACK TX/RX SET-UP ROUTINE 

THIS ROUTINE IS USED TO INITIALISE BOTH THE OUT AND THE 
TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
STATE, PRIOR TO A MODEM LOOPBACK TEST DATA PATTERN TX/RX, 



INPUTS: 



OUTPUTS 1 



Rl - TX» RX LPR CONTENTS. 

R2 - START ADDRESS OF DATA PATTERN TO TRANSMIT. 

R3 - LENGTH OF DATA PATTERN. 

ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 

CBB - LABEL AT BASE OF TX/RX CONTROl BLOCK. 

THE CONTENTS OF THE TX/RX CONTROL BLOCK (CCB) ARE OESTROthO. 

THE INDIRECT ADDRESS FIELD OF THE OUT C5R MAY BE OESTROYtD. 

THE OUT'S LPR'S AND LNC'S MAY BE MODIFIED. 

THE FOLLOWING POINTERS AND COUNTERS ARE INITIALISED; 

CMCNT,CHRTOT,DPENO,DPLEN,EXCNT,RXCNT,RXPTR,TXCNT. 

TXPTR TXRXL 

CHRTOT, RXDONF, TXDONF AND TXINTF ARE CLEARED. 



CALLING SEQUENCE: 



JSR 



PC. MODSUP 



COMMENTS: OUT IS SET UP WITH DSR AND DTR SET. 
SENT AND RECEIVED FROM EACH LINE. 



ONE DATA PATTERN IS 



SUBORDINATE ROUTINES CALLED: CONMAP,RXENBL , TXRINI . 



164364 
161532 
161314 
161526 
161524 



162156 
003122 



011004 



000001 
161156 
000003 

000002 



MODSUP: I SAVE 

CLR CHRTOT 

CLR TXINTF 

CLR TXDONF 

CLR RXDONF 



iSAVE CONTENTS OF THE GPR'S RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE SUBRT. 

(CLEAR TOTAL RECEIVED CHAR COUNTER. 
I CLEAR FLAGS USED TO LOG DMA H.OVER ERRORS. 
(CLEAR THE TX DONE FLAGS. 
iCLEAR THE RX DONE FLAGS. 



I * 
1 
I ■ 



SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO THE DESIRED STATE 



MOV Rl.CBb 

MOV OCBB.Rl 

INC Rl 

INC Rl 

MOV •lloa^.CRD* 

MOV R2.(R1)» 

MOV R5.(Rn. 

MOV 01, (Rl). 

MOV ACTLNS. CRD* 

MOVB «5,lRl). 

INC Rl 

MOV *2.(Rn 



SET CONTENTS OF LPR PARAMS IN TX/RX C.6LK, 
GET BASE ADDRESS OF CONTROL BLOCK. 
INCREMENT ADDRESS FOR NEXT WORD 
INITIALISE THE FOLLOWING IN THE CNTRL.BLK: 

LNCTRL: RTS, DTR, ENABLE RECEIVERS. 

START ADDRESS OF DATA PATTERN. 

DATA PATTERN LENGTH. 

NUMBER OF DATA PATTERNS TO TRANSMIT. 

BIT MAP OF LINES TO INITIALISE. 
SET LOOPBACK MODE TO M325. 
INCREMENT ADDRESS FOR THe NEXT WORD. 
SET AMOUNT OF OFFSET EACH TX STARTS AT TQ 



021026 004 767 004652 



I INITIALISE THE DUT AND THt ASSOCIAFtD 
» DICTATED BY THE CONTENTS OF THf TX/RX 
1 



POINTERS ANO COUNTERS* TO THE STATE 
CONTROt BLOCK, 



JSR 



PC.TXRINl 



lINITlALISE OUT. 



mski:. mMHnl^'''' ^'^^^^ ^''^Rooh^p''^^^' °^'^^ P'^^*^ 



7S-1 



D9 



SEQ 107 



4084 








4065 








4086 


021052 


012701 


1/7/7/ 


4087 


021036 


016702 


161150 


4088 


021042 


005101 




4089 


021044 


005102 




4090 


021046 


040102 




4091 


021050 


010267 


162060 


4092 


021054 


005067 


162044 


4095 


021060 


005067 


162046 


4094 


021064 


004 767 


004614 


4095 








4096 


021070 








021070 


004 756 




4097 


021072 


000207 





I INITIALISE POINTERS AND COUNTERS fOR INACTIVE LINES TO 2ER0. 

iGET THE LINE BIT MAP FOR ALL LINES. 

iGET THE ACTIVE LINE BIT MAP. 

I 

iGENERATE AN IN-ACTIVE LINE BIT MAP. 
iMOVE BIT MAP TO THE CONTROL BLOCK. 
iCLEAR THE LNCTRL SET UP PARAMETERS. 
I CLEAR THE REPEAT TX COUNT IN CNTRL BLCK 
iSET UP PARAMETERS FOR INACTIVE LINES. 



60$ J 



MOV 


*MAPLNS.R1 


MOV 


ACTLNS.R2 


COM 


Rl 


COM 


R2 


BIC 


R1,R2 


MOV 


R2.CBMAPA 


CLR 


CBLNCA 


CLR 


CBDPNA 


JSR 


FC.TXRINI 


PASS 


IC 


RTS 


PC 



iRESTORE GPR 
PC.aCSP)* 



(RETURN TO PREG05 SU8RT. 



E9 



gl(1ibAl 



KL»NC TST ! 



'rtRT4 MACRO 
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SEQ 108 



4099 

4100 

4101 

4102 

4103 

4104 

4105 

4106 

4107 

4109 

4109 

4110 

4111 

4112 

4113 

4114 

4115 

4116 

4117 

4116 

4119 

4120 

4121 

4122 

4123 

4124 

4125 

4126 

4127 

4128 

4129 

4130 

4131 

4132 

4133 

4154 

4135 

4136 

4137 

4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4153 
4154 



SBTTU GLOBAL SUBROUTINE - MSLGET - 

- MILL I SECONDS LOOP WHICH RETURNS READ WORD AND REMAINING TIME ■ 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI -SECONDS. 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THERE AFTER. 

UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 

IS RETURNED BY THIS SUBROUTINE. 



INPUTS: 



OUTPUTS: 



Rl - TIME-OUT VALUE IN MILLI-SECONOS (UP TO 64K MS). 

R2 - BIT MAP OF BITS TO TEST Cl INDICATES TO TEST THE BIT). 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSICNT - MILLI SECOND SOFTWARE LOOP COUNT, 

RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 

Rl - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT) 



CALLING SEQUENCE: 



JSR 



PC. MSLGET 



COMMENTS: 



THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 

ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 

DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

IF A TIME-OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FOR 

THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 

IF THE CONDITION IS MET, FAILURE OTHERWISE. 



J-. SUBORDINATE ROUTINES CALLED: NONE. 

f *««««« **«*«4i*****4t4k4****<t>* 4t*««4>4>******«* *** ****4t*«* * ****************** *«*****4k 



021074 

021074 004567 164224 



021100 005102 
021102 040203 



02110 \ 005701 

021101 001011 

0211l( 011400 

02111; 010067 000070 

02111*j 040200 

021120 020003 

021122 000261 

021124 001420 



MSLGET: : SAVE 



( ♦ 



J SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 :CALL REGISTER SAVE SUBRT. 



I SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD, AND CLEAR UNUSED 
1 BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 

COM R2 iGET MASK OF UNUSED BITS. 

BIC R2.R3 iMASK OUT UNUSED BITS IN DESIRED STATE WORD. 

I HANDLE THE TEST AND EXIT IF WE HAVE A TIME-OUT VALUE. 



J 



TST 


Rl 


BNE 


2t 


MOV 


(R4),R0 


MOV 


R0,62» 


BIC 


R2,R0 


CMP 


R0.R3 


SEC 




BEQ 


6$ 



(TEST THE TIME-OUT VALUF FOR ZERO. 

I IF NON-ZERO TIME-OUT. GO LOOP AND TEST. 

iGET THE WORD TO TEST BEFORE EXITING. 

tSAVE VALUE SO WE CAN RETURN IT. 

iMASK OUT UNTESTED BITS OF WORD. 

jCOMPARE AGAINST DESIRED STATE WORD. 

i INDICATE SUCCESS IN CASE WORDS ARE EQUAt . 

I EXIT WITH SUCCESS IF WORDS ARE EQUAL. 
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^EQ 109 



4155 
4156 
4157 
4158 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 



4178 
4179 
4180 
4181 
4182 
4183 
4184 



021126 
021130 



021132 
021136 
021140 
021144 
021146 
021150 
021152 
021154 
021156 
021160 
021162 
021164 



021166 
021172 
021172 
021176 
021202 



000241 
000416 



016705 161154 

011400 

010067 000042 

040200 

020003 

000261 

001405 

005305 

001367 

005301 

001363 

000241 



016700 000014 



CLC 
BR 



6$ 



I INDICATE FAILURE (TIME-OUT). 

jEXIT WITH FAILURE, WORDS AREN'T EQUAL. 



010066 
010166 
004736 



021204 000207 



021206 OOOOOO 



000002 
000004 



t *• 



NON-ZERO TIME-OUT VAi.UE. LOOP. WAITING FOR CONDITION OR TIME-OUT. 



2$ 
4$ 



MOV 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
CLC 



MSLCNT.R5 

(R4),R0 

R0.62$ 

R2.R0 

R0,R3 

6$ 
R5 
41 
Rl 
2* 



I LOAD MS LOOP COUNT. 

I GET THE WORD TO TEST. 

J SAVE WORD IN CASE THIS IS THE LAST. 

(MASK OUT UNTESTED BITS OF WORD. 

I COMPARE AGAINST DESIRED STATE WORD. 

:SET CARRY IN CASE OF SUCCESS. 

(EXIT WITH SUCCESS IF WORDS ARE EQUAL. 

J COUNT DOWN THE INSIDE HS LOOP COUNT. 

iLOOP IF MS NOT UP. 

I DECREMENT THE MS TIME COUNT. 

I IF TIME NOT UP. LOOP TO COUNT ANOTHER MS 

(CLEAR CARRY, WE TIMED-OUT. 



; HAVE EITHER FOUND CONDITION. OR TIMED-OUT (POSSIBLY FROM TIME-OUT VALUE), 
t RESTORE THE LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 



I - 

6$: 

60$: 



MOV 
PASS 



62$. RO 
RO.Rl 



MOV 
MOV 
JSR 



HTS 



PC 



( LOCAL STORAGE, 
62$: .WORD 



(PASS OUT THE LAST READ WORD. 
(RESTORE GPRS. EXCEPT THE FOLLOWING: 
RO.ROSLOT(SP) iPUT RO IN STACK SLOT. 

Rl.RlSLOTCSP) (PUT Rl IN STACK SLOT. 

PC.S(SP)* (RETURN TO PREG05 SUBRT. 

(RO - LAST READ WORD CHECKED FOR CONDITION. 

(Rl - REMAINING TIME (0 IF TIME-OUT OCCURED). 

(CARRY - SET IF SUCCESS. CLEAR IF TIME-OUT. 



(STORAGE FOR THE LAST READ WORD. 



G9 
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4186 






4187 






4188 






4189 






4190 






4191 






4192 






4193 






4194 






4195 






4196 






4197 






4198 






4199 






4200 






4201 






4202 






4203 






4204 






4205 






4206 






4207 






4208 






4209 






4210 






4211 






4212 






4213 






4214 






4215 






4216 






4217 






4218 






4219 


021210 






021210 


004567 


4220 






4221 






4222 






4223 






4224 






4225 


021214 


004767 


4226 






4227 


021220 






021220 


004736 


4228 


021222 


000207 



MACRO 
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SEQ 110 



164110 



177654 



.SBTTL GLOBAL SUBROUTINE - MSLOOP - 

J* - TEST LOOP SUBROUTINE - 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUeROUTINE. IT IS USED 
TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PER.COD. THE 
CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI -SECONDS. 
THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 
ROUTINE AND THEN ONCE EACH MILLI -SECOND THEREAFTER. 



* 

♦ INPUTS: 

4- 

» OUTPUTS: 

* CALLING SEQUENCE: 



Rl 
R2 
R3 
R4 



TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 
BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 
DESIRED STATES OF THE INDICATED FIELDS IN R2. 
ADDRESS OF THE WORD TO TEST. 



MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT). 



JSR 



PC. MSLOOP 



♦ COMMENTS,' THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

♦ CALIBRATION IS ONI-Y GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 

♦ ON THE SYSTEM. 

♦ THIS ROUTINE CAN BE USED AS A DELAY ROUTINE. BY SPECIFYING THE 

♦ DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

♦ LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

♦ IF A TIME-OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FQR 

♦ THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 

♦ IF THE CONDITION IS MET. FAILURE OTHERWISE. 
* 

♦ SUBORDINATE ROUTINES CALLED: MSLGET. 



MSLOOP:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE SUBRT 



; CALLING THE MSLGET ROUTINE FROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
i MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME-OUT VALUES. 



60$: 



JSR 

PASS 

RTS 



PC. MSLGET 

JSR 
PC 



I CALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 

jRESTCRE GPRS, 

PC.aCSP)* (RETURN TO PREG05 SUBRT 

[CARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 
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^EQ 111 



4c^50 
4^?1 

4255 
4254 
425"^ 
4256 
4237 
4238 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
424 7 
4248 
4249 
4250 
4251 
4252 
4253 

4254 
4255 
4256 

42S7 
4258 



4259 
4260 
4261 
4262 
4265 
4264 
4265 
4266 
4267 
4268 
4269 
4270 
4271 
4272 
4273 

4274 

42. '5 
4276 
42 7 7 
4278 
42 79 



021224 
021224 



021230 
021230 
021234 
021240 
021242 
021244 

021250 
021252 
021256 

021262 
021266 

021272 
021274 

021276 
021300 
021302 
021304 
021510 
021310 
021314 
021316 
021320 
021322 
021324 
021326 



012746 
012746 
010600 
104417 
062706 

005001 
012702 
016703 
016704 
016705 

030205 
001442 

01O40O 
050100 
010015 
017700 

004567 
005002 
005003 
005004 
005005 
OOfc 300 
006102 



SBTTL GLOBAL SUBROUTINE - MSSRPT - 

- MODEii STATUS SIGNAL REPORT ROUTINE - 
THIS SUBROUTINE IS UStD TO REPORT THE STATES OF THE MODEM STATUS 
SIGNALS FOR ALL ACTIVE LINES. 



INPUTS: 



OUTPUTS: 



ACTLNS - BIT MAP OF ACTIVE LINES. 

CSRA - CONTAINS ADDRESS OF THE DUT CSR. 

EF9101 - LABEL AT FORMAT STATEMENT FOR BLANK LINE. 

lESTAT - CONTAINS STATES OF THE DUT INTERRUPT ENABLE BITS 

STATA - CONTAINS ADDRESS OF THE OUT STAT REGISTER. 

NUMLNS - EQUATED TO THE NUMBER OF LINES ON THE DEVICE. 

DUT CSR INO.ADR.REG FIELD - CONTENTS DESTROrED. 
REPORT MESSAGES AR£ PRINTED ON THE OPERATOR'S CONSOLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PL, MSSRPT 



SUBORDINATE ROUTINES CALLED: NONE. 



***««***«L*AAA*«L*********AA**^*Ji4A*A* 



004567 164074 



MSSRPT: : SAVE 



iSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT. 



PRINT THE BASIC MODEM STATUS MESSAGE. 
"MODEM STATUS SIGNAL REPORT:" 

PRINTF tfMSFMTl 



007566 
000001 



000004 



000001 
160716 
160746 
160700 



MOV 


Of1SFMTl,-(SP) 


MOV 


*1.-(SP^ 


MOV 


SP.RO 


TRAP 


C$PNTF 


ADO 


04, SP 



2Ji 



160676 
164010 



CLR 


Rl 


HOV 


#1.R2 


MOV 


CSRA.R5 


MOV 


IESTAr.R4 


MOV 


ACTLNS.R5 


BIT 


R2.R5 


8FQ 


4$ 


MOV 


R4.H0 


BIS 


Rl.RO 


MOV 


R0,fR3) 


MOV 


aFSLSA.RO 


SAVE 


1 


Cl.R 


R? 


CI R 


R5 


Cl.R 


R4 


CIR 


R5 


ASl 


RO 


ROL 


R2 



jSTART WITH LINE 0. 

(GET Th^E CSR ADDRESS. 

:GET THE STATES OF THE INTERRUPT ENABLE BITS 

jGET THE ACTIVE LINES BIT MAP. 



iTEST 
I LINE 



LINE BIT 
ACTIVE? 



IN ACTIVE LINES 
NO, SKIP REPORT 



BIT MAP. 
FOR LINE. 



:SET UP DUT CSR INO.ADR.REG FIELD 

; LEAVING THE INTERRUPT ENABLE 

( BITS IN THE SPECIFIED STATE. 

iREAD THE DUT STATUS REG FOR THIS LINE. 

:SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SUBRT 

jCLEAR THE SIGNAL STATUS INDICATORS, 



jSHlF T DSR INTO CARR^ . 

i THEN ROTATE INTO INDICATOR. 
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SFQ 112 



4c?80 


021350 


006500 




4.?81 


021552 


006500 




4^8^-' 


0213i4 


006103 




4c:e5 


021536 


006500 




4^84 


021540 


006104 




4^85 


021542 


006500 




4^86 


021344 


006105 




4C8'.* 








4^88 








4?89 








4^90 








4^91 


021546 








021346 


010546 






021350 


010446 






021352 


010546 






021354 


010246 






021556 


010146 






021360 


012746 


007626 




021364 


012 746 


000006 




021370 


010600 






021372 


104417 






021574 


062706 


000016 


4292 


021400 








021400 


004736 




429? 








4294 


021402 


00630? 




4295 


021404 


005201 




4296 


021406 


020127 


000020 


4297 


021412 


002727 




4298 








4299 


021414 








021414 


012746 


007306 




021420 


012746 


000001 




021424 


010600 






021426 


104417 






021430 


062 706 


000004 


4 500 








4301 


C21454 








021454 


004 7 56 




4302 


021436 


000207 





ASL 


RO 


ASL 


RO 


ROL 


R3 


ASL 


RO 


ROL 


R4 


ASL 


RO 


ROL 


R5 



; SHIFT BLANK SLOT INTO CARRY. 

i SHIFT RI INTO CARRY. 

I THEN ROTATE INTO INDICATOR 

jSHIFT OCD INTO CARRY. 

t THEN ROTATE INTO INDICATOR 

(SHIFT CTS INTO CARRY. 

J THEN ROTATE INTO INDICATOR 



t PRINT THE STATUS FOR THIS LINE. 

; "LINE OUt OSR-N, RI-N. DCD-N, CTS»N" 

PRINTF i?MSFMT2,Rl,R2,R3.R4.R5 



4$: 



PASS 



ASL 
INC 
CMP 
BLT 



JSR 

R2 

Rl 

R1.*NUMLNS 

2$ 



PRINTF *EF9101 



60$: 



PASS 
RTS 



PC 



JSR 



jRESTORE ALL 
PC.a(5P)» 



THE GPRS 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



R5. -CSP) 
R4, -CSP) 
R5,-(SP) 
Re;. -CSP; 
Rl, CSP) 
<>MSFMT2, 
^, -CSP) 
SP.RO 
C$PNTF 

#16. SP 



C3P) 



iRETURN TO PREG05 SUBRT. 



iSHlFT LINE BIT MAP TO NEXT LINE. 

J INCREMENT THE LINE COUNTER. 

iCMP LINE COUNTER WITH QF LINES ON DEVICE. 

;ALL LINES DONE? NO, LOOP TO DO NEXT LINE. 

i PR INT A BLANK LINE. 



MOV 


^F9101. CSP) 


MOV 


#1. -CSP) 


MOV 


SP.RO 


TRAP 


CiPNTF 


ADD 


/>4,SP 



iRFSTORi: GPRS. 

pcacsp)* 



; RETURN TO PREG05 SUBRT 
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^EQ 113 



4504 
450S 

4506 
4507 
4508 
4509 
4510 
45U 
451^ 
4515 
4514 
4515 
4516 
4517 
4518 
4519 
4520 
4521 
4522 
4525 
4524 
4525 
4526 

4527 
4 528 
4329 
4330 
4331 
4332 
4333 
4354 
4335 
4336 
4337 
4338 
4339 
4 540 
4541 
4342 
434 5 
4344 
4345 



4546 
434 7 



021440 
021440 
021444 
021446 
021450 
021452 
021454 
021456 

021460 
021462 
021464 
021466 
021470 
021472 
021474 

021476 
021502 

021504 
021504 
021510 



004567 
005003 
005702 
001005 
005001 
000261 
000412 

060103 
105405 
005302 
001374 
010301 
000261 
000403 

012701 
000241 



010166 
004 736 



.SBTTL GLOBAL SUBROUTINE - MUL16U - 

* - 16 BIT UNSIGNED MULTIPLY ROUTINE - 

* THIS ROUTINE MULTIPLIES 2 16 BIT UNSIGNED NUMBERS AND RETURNS A 16 BIT 

* UNSIGNED RESULT. THE MULTIPLICATION IS PERFORMED BY ITERATIVE 

* ADDITION OF ONE NUMBER TO A SUM WHILE DECREMENTING THE OTHER NUMBER 

* TO ZERO. IF* OVERFLOW OCCURRS (177777 TO 0) THE PRODUCT IS INVALID. 

* lUPUTS: Rl - MULTIPLICAND (16 BIT UNSIGNED). 

* R2 - MULTIPLIER (16 BIT UNSIGNED). 

* 

* OUTPUTS: Rl - PRODUCT (16 BIT UNSIGNED), -1 IF OVERFLOW. 

* CARRr - SET IF SUCCESS (NO OVERFLOW). CLEAR OTHERWISE. 

* 

* CALLING SEQUENCE: JSR PC.MUL16U 

* 

* COMMENTS: NOTE: FOR MINIMUM EXECUTION TIME R2 SHOULD CONTAIN THE 

* SMALLER or THE 2 ARGl^ENTS. 

* 

4 SUBORDINATE ROUTINES CALLED: NONE. 



163660 



MUL16U:: SAVE 



JSR 



177777 



000004 





CLR 


R3 






TST 


R2 






BNE 


2i 






CLR 


Rl 






SEC 








BR 


60$ 




2J: 


ADD 


R1.R3 






BCS 


50$ 






DEC 


R2 






BNE 


2$ 






MOV 


R3.R1 






SEC 








BR 


60$ 




504: 


MOV 
CLC 


0-1, Rl 




60$: 


PASS 


Rl 


MOV 
JSR 



02151^; 000207 



RTS 



PC 



jSAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SUBRT. 

1 CLEAR THE PRODUCT. 

;CHECK THE MULTIPLIER. 

(GO TO DO MULTIPLICATION IF NOT ZERO. 

(RETURN A PRODUCT OF ZERO. 

;INDICATE SUCCESS. 

(EXIT THE ROUTINE. 

I ADD THE MULTIPLICAND TO THE PRODUCT. 
(EXIT WITH OVERFLOW IF ONE OCCURRED. 
(DECREMENT THE MULTIPLIER. 
(LOOP IF MULTIPLIER NOT ZERO. 
(PREPARE TO PASS OUT THE PRODUCT. 
(INDICATE SUCCESS. 
(EXIT WITH SUCCESS. 

(FORCE PRODUCT TO MAX VALUE, WE OVERLFOWED. 
(INDICATE FAILURE. 

(RESTORE GPRS, EXCEPT THE FOLLOWING: 
Rl.RlSLOTC':^) (PUT Rl IN STACK SLOT. 

PC.aCSP)* (RETURN TO PREG05 SUBRT 

( Rl - PRODUCT (16 BIT UNSIGNED), 
! CARRY - SET IF SUCCESS (NO OVERFLOW). 



I<9 
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SEQ 114 



4549 

4550 

4?St 

455^ 

455? 

4 5^4 

4555 

4556 

455? 

4558 

4559 

4560 

4561 

4 562 

4565 

4564 

4565 

4566 

4567 

4568 

4569 

4570 

4571 

457? 

4575 

4574 

4575 

4576 

4577 

4578 

4579 

4580 

4581 

4582 

4585 

4584 

4585 

4586 

4587 

4588 

4589 

4590 
4591 
4592 
4595 
4594 
4595 
4596 
4397 
4598 
4599 
4400 
4401 
4402 
4405 
4404 



021514 
021514 
021S20 
02152? 
021526 



021552 
021536 



021540 
021542 
021544 



004567 
010305 
052705 
005067 



004767 
103052 



010504 
006504 
006304 



165604 

17 7400 
000270 



175412 



.SB 
♦ f 

J* 

:♦ 
;* 
;* 
t* 
;♦ 
;* 
I* 
t* 
;* 
i* 
;• 
I* 
;* 
i* 
;* 
I* 
;* 
i* 
;* 
I* 
t* 
;* 
(* 

;* 
;* 
I* 
t* 
;* 
;* 



TTL GLOBAL SUBROUTINE - NEWCHR - 

- NEW CHARACTER HANDLING ROUTINE - 
THIS SUBROUTINE HANDLES A NEW CHARACTER WHICH HAS BEEN READ FROM 
THE OUT, THE COUNTERS AND POINTERS WHICH ARE INVOLVED WITH THE 
CHARACTER ARE UPDATED. THE CHARACTER IS CHECKED FOR ERRORS AND 
ANY ERRORS WHICH ARE FOUND ARE REPORTED. 



INPUTS: 



R2 
R3 



ACTLNS - 

DPRSQB - 

TXRXLB - 

BITTBL - 

ERSMRF ~ 

ERRTBL - 

ERCNTB - 

NDERPT - 
INPUTS TO SUBROUTINES: 



THE READ CHARACTER INCLUDING ERROR FLAGS AND LINE NUMBER. 
MASK OF THE INACTIVES BITS IN A TX OR RX CHAR BVTE. 
BIT MAP OF ACTIVE DUT LINES. 
LABEL AT DATA PATTERN RESYNC QUEUES TABLE BASE. 
BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
TABLE OF WORDS WITH BITS SET FOR USE IN FORMING MAPS. 
"PRINT ERROR SUMMARY FOR LINE" FLAGS, 
ERROR INFORMATION CERRNBR. ERRMSG, ERRTYP), 
BASE OF THE RX CHARACTER ERROR COUNTERS TABLE. 
CONTAINS NUMBER OF CHAR ERRORS TO REPORT ON A LINE. 

CHCNTB. DPENOB, DPLEN. DPRSQE. EXCNTB, RXCNTB. 
RXPTRB. ERRNBR, ERMSG, ERRTYP. 



OUTPUTS: 



ERRBLK 
FOLLOWING 
DPRSQ - 
ERCNT - 
EPSMRF 
EXCNT - 
RXCNT - 
RXPTR - 



CALLING SEQUENCE: 



CONTENTS DESTROYED. 
VARIABLES UPDATED FOR LINE ON WHICH CHAR WAS RECEIVED 
DATA PATTERN RESYNC QUE OF RECEIVED CHARACTERS. 
COUNT OF THE NUMBER OF CHARACTER ERRORS ON LINE. 

UPDATED "PRINT ERROR SUMMARY FOR LINE" FLAGS. 
COUNT OF THE NUM3ER OF EXTRA CHARS RECEIVED ON LINE. 
COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 
UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 



JSR 



PC. NEWCHR 



COMMENTS: THIS ROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
AND INITIAL ERRNBR ► 1. ERRNBR IS RESTORED TO ITS INITIAL 
VALUE BEFORE THIS ROUTINE RETURNS. 

SUBROUTINES CALLED : CKCHR , CKINAC . TXROFF , TXRON . 

INDIRECT SUBROUTINES: CHKEXT ,CHKLOS,ER9002.ER9003.UPDCHR . 



NEWCHR:: SAVE 



i * 





JSR 


MOV 


H5,R5 


BIS 


VH 77400, R5 


CLR 


70$ 



tSAVE CONTENTS OF GPRS RO THRU R5 . 
R5,PREG05 ;CALL REGISTER SAVE SUBRT. 
(GET THE BIT MAP Of INACTIVE DATA BYTE BITS. 
(ALL UPPER BITS OF EXPECTED DATA ARE INACTIVE* 
(CLEAR THE "ERROR FOUND" FLAG. 



; IF THE NEW CHARAC I ER IS VALID ON AN INACTIVE LINE, GO REPORT ERROR. 
; ROUTINE USED ALSO EXTRACTS LINE NUMBER FROM THE NEW CHARACTER. 



JSR 
BCC 



PC. CKINAC 
4$ 



I CHECK FOR CHAR ON INACTIVE LINE. 
iGO REPORT ERROR IF ON INACTIVE LINE 



I * 



PUSH THE NEW CHARACTER ON THE HESYNC QUE FOR THIS LINE. 



I ■ 



MOV 
ASL 
ASL 



R5,R4 

R4 

R4 



(CALCULATE BASE ADDRESS OF THE 
1 DATA PATTERN RESlNCH QUEUt" 
t CQUEUt IS 4 WORDS LONG) FOR 



L9 
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- NtWCHR - 



PAGE 80-1 



^EQ 115 



4405 
4406 
440? 
4408 
4409 
4410 
4411 
441? 
4413 
4414 
4415 
4416 
4417 
4418 
4419 
4120 
4421 
4422 
4423 
4424 
4425 
4426 
442V 
4428 
4429 
4450 
4431 

4432 
4433 
4434 
4435 
4436 
4437 
4438 
4439 
4440 
4441 
4442 
4443 
4444 
4445 
4446 
444 7 
4448 
4449 
4450 
4451 
4452 

4453 
4454 
4455 
4456 
4457 
4458 
4459 



021546 
021552 
021554 
021560 
021564 



021566 
021570 



021572 
021576 



021600 
021604 
021610 
021616 
021620 
021626 
021632 
021632 
C21634 
021642 
021650 



021656 
021662 



021664 
021670 
021674 
021702 
021704 
021712 
021716 
021722 
021722 
021724 
021732 
021740 

021/42 
03X746 



062704 
010401 
016121 
016121 
010211 



011402 
100112 



032702 
001427 



005367 
016300 
036067 
001017 
012767 
004767 

104460 
012767 
032767 
001462 



004642 

000002 
000002 



004 767 
103433 



005367 
016300 
036067 
001023 
012767 
005267 
004767 

104460 
012767 

032 767 
001426 

004 767 
005367 



070000 



000216 
005234 
002364 

014676 
004326 



000001 
000100 



021652 004767 004342 



174636 



000132 
005234 
002364 

014520 
163400 
004236 



000001 
000100 



004252 
X63544 



ADD 
MOV 
MOV 
MOV 
MOV 



00PRSQB,R4 

R4.R1 

2(Rl),(Rn* 

2(R1).(R1)* 

R2,(R1) 



( THIS LINE. 

jGET THE BASE OF THE QUEUE. 

J MOVE FROM CHRl SLOT TO CHRO SLOT 

I MOVE FROM CHR2 SLOT TO CHRl SLOT 

I PUT NEW C^ AR INTO CHR2 SLOT. 



I ♦ 

i CHECK THE DATA. VALID FOR THE CHARACTER AT THE BOTTON OF THE QUEUE 

I IF DATA. VALID IS CLEAR. EXIT THE ROUTINE -NOTHING TO ANALYZE. 



MOV 
BPL 



(R4),R2 
60$ 



iGET CHRO VALUE. SET FLAGS. 

[EXIT ROUTINE IF DATA. VALID IS CLEAR. 



TEST FOR ANY OF THE ERROR BITS SET IN CHRO. 



BIT 
BEG 



070000, R2 
2* 



J TEST FOR ANY CHRO ERROR BITS SET, 
iSKIP THIS ERROR IF NO ERROR BITS SET, 



160662 
163474 



160362 
160312 



WE HAVE AT LEAST ONE ERROR FLAG SET ON THE RECEIVED CHAR. 
REPORT DATA ERROR FLAG ERROR IF NOT IN SUMMARY MODE. 

I SET THE "ERROR FOUND" FLAG. 

iGET THE TX LINE OFFSET FOR THIS RX LINE. 

F iCHECK THE ERROR SUMMARY FLAG FOR TX LINE. 

ilF ERROR SUMMARY FLAG SET. SKIP NEXT REPORT. 

i SELECT THE ER9003 ERROR REPORT ROUTINE. 

iTURN OFF TX AND RX DURING ERROR REPORTING. 

; >>>>> ERROR <<<<<, 

TRAP C TERROR 
I INDICATE AN ERROR HAS BEEN FOUND. 
iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
lEXIT IF IT HASN' T. 

JSR PC.TXRON [TURN TX AND RX BACK ON. 

! CHECK THE CHARACTER AT THE BOTTOM OF THE RESYNC QUE FOR DATA ERRORS. 

I 

2»: 

i * 



DEC 


70$ 


MOV 


TXRXLBCR3).R0 


BIT 


BITTBL(RO).ERS 


BNE 


2$ 


MOV 


OER9005.ERRBLK 


JSR 


PC.TXROFF 


ERROR 




MOV 


Ol.FERROR 


BIT 


<fflIT06. OPTION 


BEQ 


60$ 



JSR 
BCS 



PC.CKCHR 
6$ 



[CHECK THE CHRO CHAR FOR ERRORS. 
[SKIP ERROR REPORT IF CHRO IS CORRECT. 



WE HAVE SOME SORT OF DATA ERROR SO REPORT IT (UNLESS IN Sl^MMARY REPORT MODE). 



4$ 



160576 
163410 



1602 72 
160222 



DEC 

MOV 
BIT 

BNE 
MOV 
INC 

JSR 

ERROR 

MOV 
BIT 
BEQ 

JSR 
DEC 



70$ [SET THE "ERROR FOUND" FLAG. 

TXRXLBCR3).R0 ;GET THE TX LINE OFFSET FOR THIS RX LINE. 
BITTBL(RO).ERSMRF [CHECK THE ERROR SUMMARY FLAG FOR THIS LINE, 



6$ 

0ER9002.ERRHLK 
ERRNQR 
PC.TXROFF 



<H,FERROR 
^IT06. OPTION 
60$ 

PC.TXRON 
E«RNBR 



[SKIP ERROR REPORT IF ERROR SUMMARY FLAG SET. 
[SELECT THE ER9002 ERROR REPORT ROUTINE. 
[SELECT INITIAL ERRNBR ♦ 1. 
[TURN OFF TX AND RX DURING ERROR RfPURTlN(;. 
[ >>>>> ERROR <^<<< . 

TRAP CiERROR 
[INDICATE AN ERROR HAS BEEN FOUND. 
[HAS EXTENDED ERROR REPORTING BEEN REQUE5TEU ? 
(EXIT IF IT HASN' T. 

[TURN TX AND RX BACK ON. 
[RESTORE INITIAL ERRNBR. 



i ♦ 



M9 
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4460 
4461 
4462 
4463 
4464 
4465 
4466 
4467 
4468 
4469 
44 70 
4471 
4472 
4473 
4474 

4475 
44 76 
4477 



021752 
021756 
021760 
021764 
021766 
021772 
021776 
022000 
022006 
022010 

022016 
022016 
022020 



005767 
001417 
005263 
001002 
005363 
005767 
001407 
026367 
103403 
056367 



004736 
000207 



MACRO M1200 15 -MAR -84 09:48 PAGE 80-2 
- NEWCHR - 



SEQ 116 



t COUNT A CHARACTER ERROR IF ONE OCCURRED. 

I UPDATE THE "REPORT ERROR SUMMARY" FLAG FOR LINE BASED ON ERROR COUNT. 



000044 

00330? 

003302 
160166 

003302 

002364 



6$; 



8$: 



160156 
160462 



022022 000000 



60$: 



70$: 



TST 


70$ 


BEQ 


60$ 


INC 


EftCNTB(R3) 


BNE 


8$ 


DEC 


ERCNTBCR3) 


TST 


NDERPT 


BEQ 


60$ 


CMP 


ERCNTBCR3) 


BLO 


60$ 


BIS 


BITTBL(R3) 


PASS 


ll2 


RTS 


PC 



J CHECK THE "ERROR FOUND" FLAG. 

;SKIP COUNTING AN ERROR IF FLAG IS CLEAR. 

; INCREMENT THE ERROR COUNTER FOR THIS LINE. 

(SKIP SETTING COUNTER TO MAX IF NO OVERFLOW. 

(RESET THE ERROR COUNTER TO -1 (MAX VALUE). 

t DISABLE ERROR SUMMARY FUNCTION IF 

i NUMBER OF DATA ERRORS TO REPORT IS 0. 
, NDERPT :COMPARE ERROR COUNT WITH 4> OF ERR' S TO RPT 

J SKIP SETTING OF SUMMARY FLAG IF NOT TOO MANY. 
.ERSHRF jSET "PRINT ERROR SUMMARY" FLAG FOR LINE. 



i RESTORE GPRS 
PC.SCSP)* 



J RETURN TO PREG05 SUBRT 



.WORD 



J LOCAL STORAGE FOR ERROR OCCURRED FLAG. 
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SEQ 117 



44/9 
4480 
4481 
448:? 
4485 
4484 
4485 
4486 
4487 
4488 
4489 
4490 
4491 
4492 
4493 
44*^4 
4495 
4496 
4497 
4498 

4499 
4500 



4501 
4502 



45o:s 

4504 
4505 

4506 
4 507 

4506 



022024 
022024 

022030 
022030 
022032 
022034 
022036 

022040 
022040 
022044 
022050 
022052 
022054 
022060 
022060 
022062 
022064 
022064 
02206L. 

022070 
022073 
022076 
022101 
022104 
022107 
022112 
022115 
022120 
022123 
022126 
022131 
022134 
02213/ 
022142 
022145 



004567 163274 



104454 
000145 
022070 
000000 



012746 
012746 
010600 
104417 
062706 

104422 
000776 

004 736 
000207 

110 
124 
117 
125 
122 
101 
127 
105 
122 
117 
12/ 
105 
125 
105 
11/ 
124 



022154 
000001 



000004 



117 
040 
115 
124 
040 
122 
101 
040 
040 
106 
101 
040 
107 
i.'.b 
125 
105 



123 
103 
120 
105 
110 
104 
122 
117 
123 
124 
122 
102 
040 
103 

\U^ 

1 .>.:> 



.SBTTL GLOBAL SUBROUTINE - OOPS - 

* - PROGRAM ABORT SUBROUTINE - 

* THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 

* DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 

* IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 
* 

* INPUTS: Rl - ERROR CODE GIVING REASON FOR ABORT. 
* 

* OUTPUTS: AN ERROR MESSAGE IS PRINTED, 

i* A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 

;♦ 

J* CALLING SEQUENCE: JSR PC, OOPS 
i* 

I* COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED; NONE. 

.. ***********.^*^***4i***************************** *********** ***************** 

OOPS:: SAVE jSAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 jCALL REGISTER SAVE SUORT. 
! REPORT "HOST COMPUTER HARDWARE OR SOMWARE BUG ENCOUNTERED." ERROR. 
ERRSF lOl.EMOlOl 

TRAP 
.WORD 
.WORD 
.WORD 
i REPORT "PROGRAM HUNG, WAITING FOR A CONTROL-C." 
PRINTF ftEM0102 

MOV 
MOV 
MOV 
TRAP 
ADD 
jLOOK FOR OPERATOR CONTROl ~C INPUT. 

TRAP 
2$ ;INFTNITt LOOP. 

:DON'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 
JSR PCSCSP)* :HETURN TO PREG05 SUBRT. 

PC J ROUTINE IN THE FUTURE, SO BE CONSISTANT, 



2$: 
605 



BRFAK 

BR 

PASS 

RTS 



CSERSF 
101 

EMOlOl 




i>EM0102, -(SP) 

«1, -(SP) 
SP.RO 
CSPNTF 
<>4,SP 

CJBRK 



EMOlOli: .ASCIZ /HOST COMPUTER HARDWARE OR SOMWARE BUG ENCOUNTERED./ 



DHU-ll 
GLOBAL 



450<^ 



4510 



UNC TST PART4 


MACRO Ml. 


:?00 15 


I ©ROUTINE 






- OOP 5 


0^^150 


105 


104 


056 


022153 


000 






022154 


045 


116 


045 


022157 


101 


120 


122 


022162 


117 


107 


122 


022165 


101 


115 


040 


022170 


110 


125 


116 


022175 


107 


054 


040 


022176 


127 


101 


111 


022201 


124 


111 


116 


022204 


107 


040 


106 


022207 


117 


122 


040 


022212 


101 


040 


105 


022215 


117 


116 


124 


022220 


122 


117 


114 


022225 


055 


105 


056 


022226 


040 


074 


052 


022251 


052 


052 


052 


0.\">234 


052 


052 


052 


K\\\'$7 


052 


052 


052 


022/42 


052 


052 


052 


022.'45 


045 


116 


045 


022250 


116 


000 





BIO 



MAR B4 09148 PAGt 81-1 



'^EQ lie 



EM0102:: ,ASCU /lihWAPHQGRAM HUNG, WAITING FOR A CONTROL-C, <*****#*******KNitN/ 



.EVEN 



msh^ 



m^ 



ou 



'm"'''' 



CIO 



MACRO Ml20ppp.^j^;MAR-84 09-48 PAGE 8c? 



'^B.Q 119 



45U 
4515 
4bl4 
4M^ 

4516 

451 ; 
4r>i8 

451^ 
45.^0 
4521 
4522 
4523 
4524 
4525 
4526 
4527 
4528 
4529 
4550 
4551 
4552 
4555 
4554 
4555 
4556 
4557 

4558 
4559 
4540 
4541 
4542 
4545 
4544 
4545 
4546 
454 7 

4548 
4549 
4550 
4551 
4552 
4555 
4554 
4555 
4556 
4557 
4558 
4559 

4560 
4561 

4562 
456 5 
45f4 
456S 



022252 
022252 
022256 
022262 



022264 
022272 
022276 
022500 

022504 
022510 
022512 
022516 
022520 
022522 
022350 



02^552 
022552 

022354 

o;:d542 

022546 
022552 
0^.?352 



004567 

016704 
005005 



01276V 
052702 
001002 
052705 

032702 
001402 
052705 
005705 
001412 
056567 
001004 



104460 

012767 

005265 
010467 

004736 



SBTTL GLOBAL SUBROUTINE - PRFRME - 

- PROCESS FRAMING ERRORS - 
THIS SUBROUTINF. IS USED IN THE FRAMING ERROR BIT TEST, TO VERlFf THAT 
ALL RECEIVED CHARACTERS HAVE THEIk FRAMING T.RROR BIT SET AND PARITY 
ERROR BIT Clear. 

INPUTS t R2 - CONTAINS THt CHARACTER READ FROM THE FIFO. 
ERRNBR - ERROR NUMBER Of ERRORS IN THIS ROUTINE. 
ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS 

OUTPUTS: ERRBLK - THE CONTENTS OF THIS WORD ARE DFSTROyEO, 
ERCNTB - THE ERROR COUNT FOR THIS LINE Tj UPDATED. 
MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE. 



CALLING SEQUENCE: 



JSR 



PC.PRFRME 



C0MMEN1S: THIS ROUTINE REPORTS ERRORS WITH INITIAL NUMBER. 

ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE THIS SUBROUTINE 
RETURNS. 

SUBORDINATE ROUTINES CALLED: ER6201 . 



165046 
163034 



PRFRMEi iSAVE 

MOV 
CLR 



JSR 
ERRt'J6R,R4 
R5 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 (CALL REGISTER SAVE SU6RT. 
(SAVE THE CONTENTS OF THf. INITIAL ERROR NUMBER, 
(CLEAR ERROR/MESSAGE FLAGS. 



014162 163030 
020000 

000002 

010000 

*.X>0014 

002364 160150 



t TEST FRAMING ANO PARITY ERROR BITS IN 1\JRU, REPORT ANY ERRORS FOUND, IE. 
I FRAMING ERROR BIT CLEAR, OR PARITY ERROR BIT SET. 

MOV ♦ER6201, ERRBLK iSET UP THE ADDRESS OF THE ERROR ROUTINE. 

BIT •eiT15.R2 iCHECK ON STATE OF THE FRAMING ERROR BIT. 

BNE 6» (BRANCH IF FRAMING ERROR BIT SET. 

OIS *6IT1,R5 (SET REPORT FRAMING ERROR FLAG. 



6* 
8i 



BIT 
BEO 

BIS 

TST 
BEQ 

BIT 
BNE 



*BIT12,R2 

81 

014. R5 

R5 

60$ 



(CHECK ON THE STATE OF THE PARITY ERROR BIT. 
(BRANCH IF PARITY ERROR B^T CLEAR. 
iSET REPORT "PARITY ERROR SET- FLAGS. 
(CHECK IF ANY ERROR FLAGS SET. 
(EXIT IF ALL FLAGS CLEAR. 



HITTBL(R3), ERSMRF (CHECK THE ERROR SUftlARY FLAG FOR THIS LINE, 
lot (SKIP ERROR REPORT IF ERROR SUMMARl FLAG SET. 



iREPORT ERROR "CHARACTER RECEIVED WITH PARITY/FRAMING ERROR BIT SFT". 



000001 157662 

005502 
162744 



lOi 
60« 



ERROR 



MOV 

INC 

MOV 

PASS 



I 



*>^>> ERROR * << <* . 

TRAP 



CJERROR 



Ol.FERROR 

ERCNTB(R5) 
R4 , ERRNBR 

JSR 



(INDICATE AN ERROR HAS BEEN DETECTED, 



(INCREMENT ERROR COUNT FOR THIS LINE. 

(RESTORE ERROR NUMBER* 

(RESTORE GPRS. 

PC,«(SP)* (RETURN TO PRbU05 SL»BRT» 



DIO 

DHU-ll TUNC TST PART4 MACRO M1200 15-MAR-84 09J48 PAGE Q^-l ^EQ 120 

GLOBAL Sl!BROUTINE - PRKRME - 

4566 0^2354 000207 RTS PC 
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GLOBAL SVfBROUTINE 



ElO 



MACRO M1200 15-MAR-8fl 
- PRPARE - 



09:48 PAGE 83 



StQ 121 



4568 
4569 
4570 
4571 
4572 
4575 
4574 
4575 
4576 
4577 
4578 
4579 
4580 
4581 
4582 
4583 
4584 
4585 
4586 
458 7 
4568 
4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 

4597 
4598 
4599 
4600 
4601 
4602 
4603 
4604 
4605 
4606 
4607 
4608 
4609 
4610 
4611 
4612 
4613 
4614 
4615 
4616 

4617 
4618 
4619 

4fc20 
4621 
4622 



022356 
022356 
022362 
022366 



022370 
022376 
022402 
022404 
022410 
022414 
022416 
022422 
022424 
022426 
022434 

0224 36 
022436 

022440 
022446 
022454 



004567 
016746 
005005 



012767 
032702 
001002 
052705 
032702 
001402 
052705 
005705 
001414 
036367 
001055 



104460 

012767 
032767 
001440 



SBTTL GLOBAL SUBROUTINE - PRPARE - 

* - PROCESS PARITY ERRORS - 

* THIS SUBROUTINE IS USED IN THE PARITY ERROR TEST. TO VERIFY THAT 

* ALL RECEIVED CHARACTERS HAVE THEIR PARITY ERROR BIT SET AND FRi.MMING 

* ERROR BIT CLEAR. 

* 

R2 - CONTAINS THE CHARACTER READ FROM THE FIFO. 
R3 - CONTAINS 2 ♦ LINE NUMBER OF THE READ CHAR. 
ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 
ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS. 
TERROR - "AT LEAST ONE ERROR FOUND" FLAG. 



* INPUTS: 

A. 
* 

* OUTPUTS: 

* 



ERRBLK - THE CONTENTS OF THIS WORD ARE DESTROYED. 
ERCNTB - THE ERROR COUNT FOR THIS LINE IS UPDATED. 
MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE. 



JSR 



PC, PRPARE 



♦ CALLING SEQUENCE: 

♦ COMMENTS: THIS ROUTINE REPORTS ERRORS WITH INITIAL ERRNBR THRU ERRNBR^l. 

♦ ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE THIS SUBROUTINE 

♦ RETURNS. 

♦ THE CONTENTS OF THE ERRBLK ARE DESTROYED. 

* 

♦ SUBORDINATE ROUTINES CALLED: ER9002»ER6201 . 



162742 
162730 



PRPARE: !SAVE 

MOV 
CLR 



JSR 
ERRNBR, -CSP) 
R5 



(SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 (CALL REGISTER SAVE SUBRT. 
iSAVE THE CONTENTS OF THE INITIAL ERROR NUMBER. 
I CLEAR ERROR/MESSAGE FLAGS. 



i * 



014162 
010000 

000010 
020000 

000003 
002364 



162724 



t - 



160044 



TEST FRAMMING AND PARITY ERROR BITS IN TURN. REPORT ANY ERRORS FOUND, IE, 
PARITY ERROR BIT CLEAR, OR FRAMMING ERROR BIT SET. 

(SET UP THE ADDRESS OF THE ERROR ROUTINE. 
I CHECK ON STATE OF THE PARITY ERROR BIT. 
(BRANCH IF PARITY ERROR BIT SET. 
(SET REPORT PARITY ERROR FLAG. 

I CHECK ON THE STATE OF THE FRAMMING ERROR BIT. 
(BRANCH IF FRAMMING ERROR BIT CLEAR. 
iSET REPORT "FRAMMING ERROR SET" FLAGS. 
(CHECK IF ANY ERROR FLAGS SET. 

(BRANCH TO MAKE DATA CHECK IF ALL FLAGS CLEAR. 
F (CHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
(SKIP ALL ERROR REP IF IN ERROR SUMMARY MODE. 
RECEIVED WITH PARITY/FRAMMING ERROR BIT SET/CLEAR". 
( >>:»>> ERROR <<<<<. 

TRAP CiERROR 



000001 
000100 



157556 
157506 





MOV 


*eR6201, ERRBLK 




BIT 


*6IT12,R2 




BNE 


6( 




BIS 


*6IT3,R5 


6$: 


BIT 


*flIT13,R2 




BEQ 


8$ 




BIS 


#3,R5 


8$: 


TST 


R5 




BEQ 


1?J 




BIT 


DITTBLCR3),ERS 




BNE 


14$ 




(REPORT 


ERROR "CHAR RE 




F.RROR 






MOV 


VM.FERROR 




BIT 


^IT06, OPTION 




BEQ 


18* 



(INDICATE AN ERROR HAS BEEN FOUND. 
(HAS EXTENDED ERROR REPORTING BEEN 
(EXIT IF IT HASN'T. 



REQUtS 



TED 



FIO 
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4623 
4624 
4625 
4626 
4627 
4628 
4629 
4630 
4631 
4632 
4635 
4634 
4635 
4636 
4637 
4638 
4639 
4640 

4641 
4642 
4643 
4644 
4645 
4646 
4647 

4646 



022456 
022462 
022466 
022470 
022474 
022476 
022500 
022504 
022512 
022514 
022522 
022524 
022530 
022534 

022542 
022542 
022544 



022552 
022556 

022562 
022562 
022564 



005267 
016304 
111404 
042704 
120204 
001427 
042704 
056367 
001017 
036367 
001402 
052704 
012701 
012767 



104460 
012767 



005263 
012667 



004736 
000207 



MACRO 



M1200 
- PRP 



15-MAR-84 09:48 PAGE 83-1 
ARE - 



SEQ 122 



162634 
003402 

177400 



100000 
002364 

002364 

100000 
011371 
014520 



i COMPARE ACTUAL DATA WITH EXPECTED DATA TO CHECK FOR MULTIPLE ERRORS. 



12$: 



157766 
157762 

162560 



14$: 



000001 157452 



003302 
162534 



16$: 
18$: 

60$; 



INC 

MOV 

MOVB 

BIC 

CMPB 
6EQ 

BIC 

BIT 
BNE 

BIT 
6EQ 

BIS 

MOV 

MOV 

t REPORT 
ERROR 

MOV 



INC 
MOV 

PASS 

RTS 



ERRN6R 

RXPTRB(R3).R4 

CR4),R4 

*177400.R4 

R2,R4 

18$ 

#6IT15.R4 



(INCREMENT ERROR NUMBER. 

iGET THE POINTER TO THE EXPECTED DATA. 

I GET THE EXPECTED DATA. 

(CLEAR THE UPPER BYTE. 

(COMPARE ACTUAL AND EXPECTED DATA. 

(SKIP ERROR REPORT IF DATA CORRECT. 

(CLEAR "NONE" EXPECTED MESSAGE FLAG. 
BITT3LCR3).ERSMRF (CHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
16$ (SKIP ERROR REPORT IF ERROR SUMMARY FLAG SET, 

BITTBLCR3),RXD0NF ( CHECK FOR RECEPTION COMPLETE ON THIS LINE. 
14$ (SKIP SETTING NONE EXPECTED FLAG. 

#BIT15,R4 (SET "NONE" EXPECTED MESSAGE FLAG. 
*EM9008,R1 (SELECT ERROR MESSAGE TO BE REPORTED. 
0ER9O02,ERaBLK (SELECT ERROR REPORTING ROUTINE. 
ERROR"RECEIVE CHARACTER MISCOMPARE" 



<?1.F£RR0R 



ERCNTBCR3) 
CSP)*,ERRNBR 



TRAP 
(INDICATE AN ERROR HAS BEEN FOUND. 



(INCREMENT ERROR COUNT FOR THIS LINE. 
(RESTORE ERROR NUMBER. 



C$ERROR 



PC 



J5R 



(RESTORE GPRS. 
PC.QCSP)* 



(RETURN TO PREGOS SUBRT 



GLOBAl SltBROuflNE 



GIO 



T4 MACRO M120Q ^15-MAR-84 09:48 PAGE 84 
- PRTLPR ' 



SEQ 125 



4650 
4651 
465J? 
4653 
4654 
4655 
4656 
465/ 
4658 
4659 
4660 
4661 
4662 
4663 
4664 
4665 
4666 
4667 
4668 
4669 
4670 
4671 
4672 
4673 

4674 
4675 
4676 
4677 
4678 
4679 
4680 
4681 



4682 
4683 



022566 
022566 
022572 
022576 
022602 
022606 
022612 
022614 

022616 
022616 
022620 
022624 
022630 
022634 
022636 
022640 
022644 
022644 
022646 



004567 
016701 
016702 
042703 
056703 
010311 
011204 



010446 
012746 
012746 
012746 
010600 
104415 
062706 

004 736 
000207 



162532 
157402 
157402 
177760 
157422 



012075 
007206 
000003 



000010 



.SBTTL GLOBAL SUBROUTINE - PRTLPR - 

1* -PRINT THE CONTENTS or THE LPR. 

I* THIS ROUTINE IS USED TO PRINT OUT EXTENDED INFORMATION ON THE 

;» CONTENTS OF THE LINE PARAMETEa REGISTER CLPR). 

J* 

R3 - CONTAINS THE NUMBER OF THE LINE YOU WISH TO EXAMINE. 

CSRA - CONTAINS THE ADDRESS OF THE OUT'S CSR. 

lESTAT - CONTAINS THE CURRENT STATUS OF THE TX ANO R)( INTERRUPT 

ENABLE BITS IN THE OUT'S CSR. 
LPRA - CONTAINS THE ADDRESS OF THE DUT'S LPR REGISTER. 



;♦ INPUTS; 

;* 

I* 

i* 

i* 

i* 

;* OUTPUTS: 

;* 

i* CALLING SEQUENCE: 



AN EXTENDED INFORMATION MESSAGE IS PRINTED ON THE OPERATORS 
CONSOLE . 



JSR 



PC, PRTLPR 



t* 

t* COMMENTS: THIS ROUTINE CHANGES THE INDIRECT ADDRESS FIELD OF THE DEVICE 

;* UNDER TEST' S CSR. 

i* 

;♦ SUBORDINATE ROUTINES CALLED: NONE. 

PRTLPR: :SAVE tSAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 jCALL REGISTER SAVE SUBRT. 
(GET THE CSR ADDRESS. 
jGET THE LPR ADDRESS. 
iCLEAR ANY UNWANTED BITS. 

(SET STATE OF TX ANO RX INTERRUPT ENABLE BITS. 
(SELECT LINE. 
jGET CONTENTS OF THE LPR. 
(PRINT MESSAGE "CONTENTS OF THE LPRjNNNNNN" 
PRINTX #EF9019.*EM9026,R4 (PRINT OUT MESSAGE ON OPERATORS CONSOLE. 

MOV P4,-CSP) 
MOV ©EM9026.-CSP) 
MOV 0EF9019,-CSP) 
MOV 03. -CSP) 
MOV SP.RO 
TRAP CJPNTX 
ADO 010, SP 
60$: PASS (RESTORE GPRS. 

JSR PC.St(SP)* (RETURN TO PREG05 SUBRT. 

RTS PC 





JSR 


MOV 


CSRA.Rl 


MOV 


LPRA,R2 


BIC 


0177760, R3 


BIS 


IESTAT,R3 


MOV 


R3,CR1) 


MOV 


(R2).R4 



HIO 



DHU-U TUNC TST PART4 
GLOBAL SUBROUTINE 



MACRO M1200 15 -MAR -84 09:48 PAGE 8S 
- PUFIFO - 



SEQ 124 



4685 








4686 








4687 








4680 








4689 








4690 








4691 








469.? 








4695 








4694 








4695 








4696 








469? 








4698 








4699 








4 700 








4701 








4 702 








4703 








4704 


022650 








022650 


004567 


162450 


4705 


022654 


012701 


001000 


4706 


022660 


016704 


157316 


4707 








4 708 


022664 


011402 




4709 


022666 


100016 




4710 








4711 








4712 








4713 








4714 


022670 


012700 


070000 


4715 


022674 


040200 




4716 


022676 


001006 




4717 








4718 








4719 








4720 


022700 


012700 


000301 


4721 


022704 


040200 




4722 


022706 


001002 




4725 


022710 


004767 


001644 


4724 








4725 


022714 


005301 




4 726 


022716 


001562 




4727 


022720 


000241 




4728 


022722 


000401 




4729 


022724 


000261 




4 750 








4751 


022726 








022726 


004 7 56 




4 752 








4733 


022730 


000207 





.SBTTL GLOBAL SUBROUTINE - PUFIFO - 

♦ - PURGE THE FIFO 

♦ THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO, 

♦ ANY BMP COOES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 

♦ INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 
* 

* 

♦ OUTPUTS: CARRY BIT - INDICATES THE STATE OF THE FIFO, SET;" PURGED. 

♦ BHPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED. 

♦ CALLING SEQUENCE: JSR PC, PUFIFO 
* 

♦ COMMENTS: 

♦ SUBORDINATE ROUTINES CALLED: SAVBMP. 



PUFIFO: :SAVE 



2$: 



MOV 
MOV 

MOV 
BPL 



0512. ,R1 
RBUFA.R4 

CR4),R2 
6$ 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 iCALL REGISTER SAVE SUBRT. 
tSET MAXIMUM TRY COUNT OF 512. 
;GET ADDRESS OF THE RECEl'VER BUFFER REGISTER. 

jGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
;EXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 



I CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 

! IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 



MOV 
BIC 
BNE 



070000, RO 

R2.R0 

4$ 



iGENERATE A BIT MAP OF CHAR ERROR BITS 

I WHICH ARE NOT SET FOR CHAR. 

; THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 



J CHECK IF THE READ DATA IS MODEM STATUS . BMP OR SELFTEST?. 



4$: 

6i: 
60$ 



MOV 
BIC 

BNE 

JSR 

DEC 
BNE 

CLC 
BR 

SFC 

PASS 
RTb 



0501.ro 

R2.ro 

4$ 

PC. SAVBMP 

Rl 
2$ 

60$ 



JSR 



PC 



CHECK IF BMP. 
TRY TO CLEAR BMP FLAGS IN THE READ DATA. 
IF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 
;SAVE BMP CODE ON THE QUEUE. 

; DECREMENT THE TRY COUNT. 

jLOOP TO TRY AGAIN. 

iCLEAR CARRY. TO INDICATE FIFO NOT PURGED. 

lEXIT WITH CARRY CLEAR. 

;SET CARRY, TO INDICATE FIFO PURGED. 

jRESTORE GPRS, 

PC.SCSP)* ;RtTURN TO PRtGOS SUBRT, 

jCARRt BIT, SET INDICATES FIFO PURGED. 



110 



StbeiL 






PAHT4 MACRO Ml^O 



PUFIFR 



MAR 84 09:48 PAGF. 8b 



'^EQ 125 



4-55 

4:?6 

4:5^ 

4/58 
4 7?'^ 
4:4c 
4 741 
4 "4,^ 
4^4? 
4 744 
4 74^ 
4 746 
4 74 7 
4 748 
4 749 

4"r>o 
4751 

47<^^ 

4755 

4"'S4 
475^ 
4 756 
4757 

4758 
4759 
4 760 
4761 

4 762 
4763 

4 764 
4?6S 
4 766 

4767 
4 768 
4 769 
4770 
4771 
4 7 7? 
4 7 7 5 
4 7 74 
4775 
4776 
4777 
4 7 78 
47/9 
4780 
4781 
478^ 
478i 
4 784 
4 785 
4 786 
4 78? 
4 788 
4/69 
4 790 



02273c> 
0^2 752 

022 736 
022742 



022746 
022752 



022754 
022760 
022762 



022 764 

022 7 72 
0227 76 
025000 
025002 
023006 



.SBTTL GLOBAL SUBROUTINE - PUFIFR - 

- PURGE FIFO REPORT ANY ERRORS FOUND. 

THIS ROUTINe REMOVES ALL DATA FROM THE FIFO. ANY BMP CODES THAT ARE 

FOUND ARE SAVE ON THE QUEUE TO BE REPORTED LATER IN THE BMP REPORT TEST 

ANY UNXEPECTED DATA (IE ANY NON-STATUS INFORAMTION) THAT ARE FOUND, 

ARE REPORTED AS AN ERROR . 

IF THE FIFO WILL NOT PURGE AFTER 512 ATTEMPTS. THEN THE CURRENT TEST 

THAT CALLED THI'j ROUTINE RECEIVES A FAILURE FLAG THAT SHOULD BE USED 

TO ABORT THE TEST. 

INPUTS: ERRTBL ERRTYPE. ERRMSG. ERRNBR ARE SET UP CORRECTLY. 
RBUFA CONTAINS THE ADDRESS OF THE RECEIVER. 

OUTPUTS: CARRY BIT - ABORT TEST FLAG. CLR - ABORT TEST. SET > OK. 
ERRBLK VALUE WILL BE DASTROYED. 

BMPCQP - THE BMP CODE QUEUE POINTER MAY BE UPDATED. 
THE CONTENTS OF THE BMP CODE QUEUE MAY BE UDATED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. PUFIFR 



THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR 

THRU TO ERRN6R*2. 

THE ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE RETURNING. 

SUBORDINATE ROUTINES CALLED: ER1603,ER9001 .ER9002.SAVBMP . 



004567 152366 
016746 162354 
012705 OOIOOO 



PUFIFR: :SAVE 

MOV 
MOV 



JSR 
ERRNBR, (SP) 
*512. .R5 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SU6RT, 

I SAVE THE CONTENTS OF THE ERROR NUMBER. 
(SET MAXIMUM READ COUNTER TO 2*FrF0 SIZE. 



; READ DATA FROM THE FIFO UNTIL DATA VALID IS CLEAR OF READ COUNTfcR IS ZERO. 
: REPORT ANY BMP OR UNEXPECTED DATA AS ERRORS. 



017702 
100063 



157230 



25: 



MOV 
8PL 



aRBUFA.R2 
8i 



;GEr THE CONTENTS OF THE RECEIVER BUFFER REG. 
lEXlT IF DATA VALID CLEAR, IE. FIFO PURGED. 



CHECK IF READ DATA IS STATUS OR UNEXPECTED CHARACTER. 



012700 070000 

040200 

001012 



MOV 
BIC 
BNE 



#70000. RO 

R2.R0 

4$ 



;GENERATE A BIT MAP OF CHAR ERROR BITS 

J WHICH ARE NOT SET FOR CHAR. 

;SI<IP BMP CHECK IF IT IS UNEXPECTED DATA. 



012767 
012700 
040200 
00100! 
004 767 
000430 



014420 
000300 



001552 



162330 



CHECK IF THE READ DATA IS MODEM STATUS . BMP OR SELFTEST?. 
IF IT IS A BMP CODE THEN SAVE IT ON THE QUEUE. 



MOV OtR900 I, ERRBLK 

MOV <>300,RO 

BIC R2.R0 

BNE 4$ 

JSR PC.SAVBMP 

BR fi$ 



I SET UP THE CORRECT ERROR REPORTING ROUTINE. 

J CHECK IF BMP OR SELFTEST?. 

iTRY TO CLEAR BMP FLAGS IN THE READ DATA. 

tSKIP BMP ERROR REPORT IF MODEM OR SELFTEST?. 

J SAVE THE BMP CODE ON THE QUEUE. 

I BRANCH TO CHECK READ COUNT, 



CHECK IF THE READ DATA IS MODEM, SELFTEST OR UNEXPECTED DATA. 



J 10 



OHU U FUNC TST PART4 
GLOBAL SUBROUTINE 



4 791 
4792 
4795 
4 794 
4 795 
4796 
4797 
4 798 
4799 
4800 
4801 
4802 

4803 
4804 
4805 
4806 
4807 
4806 
4809 
4810 
4811 
4812 
4815 
4814 
4815 
4816 
4817 
4818 
4819 
4820 
4821 
4822 
4825 

4824 
4825 
4826 
4827 
4828 
4829 
4830 

4831 
4832 
4833 



025010 
023014 
023016 
023022 
023024 
025026 
023032 
025054 
025040 
023044 

023052 
025052 



023054 
025062 



025124 
025150 
023150 



052702 
001425 
012701 
010203 
000503 
042 705 
006503 
052704 
005267 
012767 



104460 



032767 
001415 



MACRO M1200 15-MAR-84 09:48 PAGE 86-1 
- PUriFR 



^EQ 126 



000001 
012466 

177760 

100000 
162252 
014520 



4$ 



iTEST THE MODEM STATUS INDICATION BIT. 
(DO NOT REPORT ANY ERROR IF MODEM STATUS. 
iPASS THE CORRECT ERROR MESSAGE TO REPORT. 
(EXTRACT THE LINE NUMBER FROM 
; THE READ DATA. 



162250 



BIT *BIT0.R2 
BEQ 6$ 
MOV #EM9104.R1 
MOV R2,R3 
SWAB R5 
BIC <?177760,R5 t 

ASL R3 (FORM LINE NUMBER TIMES 2 FOR ER9002 ROUTINE. 

BIS 0eiT15.R4 iSET THE "NONE" EXPECTED MAESSAGE FLAG. 
INC ERRNBR jSET ERROR NUMBER TO INTIAL ERRBR*1. 

MOV *ER9002.ERRBLl< (SELECT THE CORRECT ERROR REPORTING ROUTINE. 
(REPORT ERROR "UNEXPECTED DATA FOUND IN FIFO". 
ERROR ( >>>>> ERROR <<<<<. 

TRAP CJERROR 
( * 
t EXIT WITH FAILURE IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 157100 



023064 005367 162226 

023070 005505 
023072 001325 



023074 062767 000002 
025102 012767 014070 
023110 012701 011670 



023114 

025114 104460 

025116 000241 

023120 000401 



6$: 



BIT 
BEQ 



DEC 

DEC 
BNE 



*eiT06, OPTION 
7$ 



ERRNBR 



R5 
2$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 

(RESTORE ERROR NUMBER TO INTIAL ERRNBR. 

(DECREMENT READ COUNTER. 

(LOOP TO READ NEXT CHAR FROM FIFO IF COUNT ^ 0. 



162214 
162212 



025122 000261 

012667 162166 
004756 



023132 000207 



THE FIFO WILL NOT CLEAR, REPORT THE ERROR AND INDICATE THAT THE TEST IS TO 
BE ABORTED. 

ADD #2. ERRNBR (SET ERROR NUMBER TO INTIAL ERRNBR *2. 
MOV ^R1603,ERRBLI< (SELECT THE CORRECT ERROR REPORTING ROUTINE. 
MOV *EM9017.R1 (PASS THE MESSAGE TO BE REPORTED. 
jREPORT THE ERROR "FIFO WILL NOT PURGE. (DATA VALID STUCK SETV 
J "?????? TEST ABORTED". 

ERROR ; >>>>> ERROR <<<<<, 

fp/\p CtERROR 
(INDICATE THE TEST IS TO BE ABORTED. 
(EXIT THIS ROUTINE AND ABORT THE CURRENT TEST. 

(SET THE CARRY, DO NOT ABORT THE TEST. 

(RESTORE INITIAL ERROR NUMBER. 

(RESTORE GPRS, 

PC,a(SP)t (RETURN TO PREG05 SUBRT 

(CARRY BIT, SET INDICATES FIFO PURGED, 00 NOT 

i ABORT THE TEST. 



7$t 


CLC 
BR 


lot 


8$: 


SEC 




lot: 
60$: 


MOV 
PASS 


(SP)t. ERRNBR 

JSR 



RTS 



PC 



OHU-ll FUNC TST PART4 
GLOBAL SrBROUTINB 



KIO 



MACRO M120Q 15 MAR 84 09-48 PAGE 87 
- PURRXB - 



SEQ 127 



4835 
4836 
4857 
4838 
4839 
4840 
4841 
484.: 
4843 
4844 
4845 
4846 
4847 
4848 
4849 
4850 
4851 
4852 
4853 
4854 
4855 
4856 

4857 
4858 
4859 
4860 
4861 
4862 
4863 
4864 
4865 

4666 



023134 
023134 

023140 
023144 
023150 
023154 
023156 
023162 

023164 
023164 
023166 



004567 162164 



012701 
012721 
012721 
005021 
020127 
101774 



004736 
000207 



002712 
002720 
002720 

00il20 



.SB 

i * * 
t* 

J* 

;* 

!♦ 

;* 
I* 

!* 

;♦ 

; + 

:* 
;* 
;* 
J* 
i* 
i* 
I* 
i* 



TTL GLOBAL SUBROUTINE - PURRXB - 

- PURGE THE RX BUFFER IN MEMORY ROUTINE - 
THIS SUBROUTINE IS USED BEFORE THE BEGINNING OF A TX/RX OF DATA 
PATTERNS TO CLEAR OUT THE RX BUFFER AND TO INITIALIZE THE VARIOUS 
COUNTERS AND POINTERS RELATED TO THAT BUFFER. 

INPUTS: RXBSTA - LABEL AT THE BEGINNING OF THE RX BUFFER. 

OUTPUTS: RXBCNT ■ COUNT OF * OF CHARS IN RX BUFFER C CLEARED). 
RXBIPT - INPUT POINTER TO RX BUFFER (INITIALIZED). 
RXBOPT - OUTPUT POINTER TO RX BUFFER (INITIALIZED). 
THE CONTENTS OF THE RX BUFFER ARE CLEARED. 



CALLING SEQUENCE: 

COMMENTS: 



JSR 



PC. PURRXB 



SL«ORDINATE ROUTINES CALLED: NONE. 



PURRXB:: SAVE 



2$: 



60$: 



MOV 
MOV 
MOV 
CLR 
CMP 
BLOS 

PASS 

RTS 



JSR 

*RXB0PT.R1 

«flXBSTA,(Rl)* 

ARXBSTA.(Rl)* 

(RD* 

R1.#RXBEND 

2$ 



J SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 I CALL REGISTER SAVE SU6RT. 

iGET THE ADDRESS OF THE RX OUTPUT POINTER. 

INITIALIZE THE RX BUFFER OUTPUT POINTER. 

INITIALIZE THE RX BUFFER INPUT POINTER. 

CLEAR CHAR COUNT AND THE BUFFER AREA. 
(CHECK IF LAST LOCATION HAS BEEN CLEARED. 
iLOOP IF NOT DONE. 



PC 



JSR 



;RFSTORE GPRS. 
PC.a(SP)^ 



iRETURN TO PREG05 SUBRT 



OKU-ll TUNC TSl PART4 
GLOBAL. SUBROUTINE 



LIO 



MACRO M1200 l,5;MAR-8n 09:48 PAGt 88 



SEQ 128 



4868 

4869 

4870 

48/1 

487^ 

4873 

4874 

4875 

4876 

487 7 

4878 

4879 

4880 

4881 

4882 

4883 

4884 

4885 

4886 

4887 

4888 

4889 

4890 

4891 

489? 

4893 

4894 

4895 

4896 

4897 

4898 

4899 

4900 

4901 

4902 
4903 
4904 
4905 
4906 
490 7 
4908 
4909 
4910 
4911 
491? 
4913 
4914 
4915 
4916 
4917 
4918 
4919 
4920 
4921 
4922 
4923 



023170 
023170 
025174 
023200 
023204 
023210 
023214 



023220 
023224 
025230 
023232 
023234 



023236 
025242 
0^3250 
023252 



004567 
016704 
016703 
005067 
0047 ■ 
004767 



012701 
012702 
005021 
020102 
103775 



016701 
026/67 
001402 
062701 



162150 
162116 
157026 
15 7276 
001320 
002440 



004642 
005042 



15/004 
15/254 

000062 



1^67^2 



.SB 
i ♦* 
t* 

• * 
I* 
J* 
t* 
J* 
;* 

i* 

1* 
J* 
;* 
i* 
i* 

;* 

J* 

!♦ 
i* 

I* 

:* 
J* 

;* 
t* 
;• 
:* 
I* 

!* 

;♦ 



TTL GLOBAL S'JBROUTINE - RDCHRS - 

- READ AND COHPARE INPUT CHARACTERS ROUTINE - 
THIS SUBROUTINE READS THE CHARACTERS FROM THE RX BUFFER IN MEMORY. 
IF CHARACTERS STOP APPEARING IN THE BUFFER WITH DATA. VALID SET 
OR IF MORE THAN THE ALLOWABLE NUMBER OF CHARACTERS HAS BEEN READ FROM 
THE BUFFER THIS ROUTINE EXITS WITH AN RX COMPLETE INDICATION. 
EACH READ CHAR IS ANALYZED AND ANY NECESSARY ERRORS ARE REPORTED. 



INPUTS: 



OUTPUTS: 



ACTLNS - BIT MAP OF THE ACTIVE DOT LINES. 

ERRNBR - SET TO ERROR NUMBER OF FIRST ERROR IN THIS ROUTINE. 

IBM - MASK OF THE INACTIVE BITS IN A TX OR RX CHAR BYTE. 

OSTENC - ADDRESS OF THE END OF THE OUTPUT STORAGE FIFO BUFFER 

OSTPTR - POINTER TO THE NEXT BYTE TO READ FROM OSTORE. 

RXBOPT - POINTER INTO THE RX CHAR BUFFER IN MEMORY. 

RXTOUT - TIME-OUT VALUE FOR RX OF LAST CHAR. 

ERROR MESSAGES MAY BE PRINTED AT Tf-tE OPERATOR'S CONSOLE. 

TXDBLF ■ TX/RX DISABLED FLAG CCLEAREO). 

TXENBM - TX. ENABLE STATE MASK CDESTRCfEO). 

SAVPRI - STORAGE FOR PROCESSOR PRIORI. Y (DESTROYED). 

SAVTEN - STORAGE FOR TX. ENABLE STATES (DESTROYED). 



CALLING SEQUENCE: 



JSR 



PC, RDCHRS 



COMMENTS: THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR 
THRU INITIAL ERRNBR *■ 4. 

"OR 

SUBROUTINES CALLED t CKCHR.NEWCHR.REPCOD.RXIEO.RXIEl . TXENBL .TXIEO. TXIEl . 

WAIBIS. 



RDCHRS:: SAVE 





JSR 


MOV 


ERRNBR . R4 


MOV 


IBM.R3 


CLR 


TXOBLF 


JSR 


PC.RXIEl 


JSR 


PC»TXIE1 



tSAVE CONTENTS Or GPRS RO THRU R5 . 

R5,FREb05 iCALL REGISTER SAVE SUBRT. 

(PRESERVE THE INITIAL ERROR NUMBER. 

tGET THE INACTIVE BIT MASK. 

(CLEAR THE TX DISABLED FLAG. 

I TURN ON DUT RECEPTION INTERRUPTS. 

jTURN ON DUT TRANSMISSION INTERRUPTS. 



J * 



CLEAR ALL RESYNC QUEUES FOR ALL LINES. 



(GET BASE ADDRESS OF RESYNC QUEUES TABLE. 
iGET END ADDRESS OF RESYNC QUEUES TABLE. 
2J: CLR (RD* iCLEAR A WORD OF THE TABLE. 

1 CHECK IF POINTER AT END OF TABLE. 
[LOOP UNTIL TABLE IS CLEAR. 

I WAIT FOR A CHARACTER TO APPEAR IN THE FIFO. 

; IF NO CHARACTER APPEARS WITHIN TIMEOUT PERIOD: EXIT ROUTINE. WE'RE DONE 



MOV 


<^0PRSQB.R1 


MOV 


^DPRSQE,R2 


CLR 


(RD* 


CMP 


R1,R2 


BLO 


2t 



4$ 



MOV 


RXTOUT, Rl 


CMP 


TXDONF. ACTLNS 


BEQ 


6$ 


ADD 


^)50,,R1 



iGET TIME-OUT FOR SLOWEST BAUD RATE IN USE. 
(CHECK FOR TRANSMISSION DONE ON ACTIVE LINLS. 
(SKIP ADDING 5C MS DELA1 IF TX DONE ALL LINES 
jADD 50 MILLI SEC TO DELAY IF NOT LAST CHAR. 



MIO 
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^EQ 129 



4924 
4925 
49?6 
4927 
4928 
4929 
4950 
4951 
4952 
4955 
4934 
4935 
4936 
4937 
4936 
4939 
4940 
4941 
4942 
4943 



4944 



4945 
4946 
4947 



4948 
4949 
4950 
4951 
4952 
4953 
4S54 
4 955 
4956 
4957 
4958 
4959 

4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
49/0 
49?! 
49/.' 
4973 



023256 
023262 
023266 
023272 



052701 
016702 
004 767 

103117 



023300 
023304 
023306 
023314 
023316 
023322 
023326 
023334 
023356 
023336 
023340 
023342 
023342 
023346 
023550 
025354 
023360 
023560 
023362 
025364 

023364 
023370 
023372 
025376 
023402 



023410 
023410 
025412 



005767 
100027 
026727 
101023 
004767 
016705 
026727 
101013 

104440 
010001 

012700 
104441 
004767 
005067 

010100 
104441 



005567 
001014 
010467 
012701 
012767 



170000 
157424 
003520 



023274 004767 175154 



6$: BIS #170000. Rl 

MOV RXB0PT.R2 

JSR PC.WAIBIS 

BCC 18$ 

JSR PC.GETCHR 



J INDICATE TO TEST DATA. VALID BIT. 
I INDICATE TO CHECK MEMORY RECEIVE BUFFER. 
I WAIT FOR RECEIVED CHAR OR TIME-OUT. 
lEXIT ROUTINE IF TIME-OUT, WE'RE DONE, 

I READ A CHARACTER FROM THE MEMORY BUFFER. 



CHECK IF THE TX ISR IS DISABLED. 

RE -ENABLE RX ISR IF THE SPACE FOR NEW CHARS IS LOW ENOUGH. 
IF THE BUFFER CAN ACCOMODATE MORE CHARS THEN RE -ENABLE TRANSMISSION. 



157202 

157404 000020 

001212 
156734 
157364 000020 



8$: 



000540 

002054 
157126 



TST TXDBLF 

BPL 101 

CMP RXBCNT.*RXBETX 

BHI 10$ 

JSR PC.RXIEl 

MOV TXENBM.R5 

CMP RXBCNT.^XBETX 

BHI 10$ 

GETPRI Rl 



SETPRI ffPRI07 



t CHECK IF TX IS DISABLED. 

(SKIP RX/TX CHECK IF TX NOT DISABLED. 

I COMPARE BUFFER COUNT WITH LEVEL TO ENABLE RX. 

tSKIP ENABLE RX IF BUFFER TOO FULL. 

(ENABLE RECEPTION INTERRUPTS. 

jGET THE PRESERVED TX. ENABLE STATES. 

I COMPARE BUFFER COUNT WITH LEVEL TO ENABLE TX. 

I SKIP ENABLING TX IF BUFFER TOO FUl.l . 

;SAVE THE CURRENT PROCESSOR PRIORITY. 

TRAP C$GPRT 
MOV RO.Rl 



JSR 

CLR 
SETPRI 



PC.TXENBL 

TXDBLF 

Rl 



J DISABLE INTERRUPTS. 



J ENABLE TRANSMISSION. 

J CLEAR THE TX DISABLE FLAG. 

(RE -ENABLE INTERUPTS. 



10$! 



MOV 
TRAP 



MOV 
TRAP 



OPRI07.ro 
C$SPRI 



R1,R0 
C$SPR1 



157106 

161720 
012001 
014032 161712 



DEC CHRTOT ..cCREmENT THE TOTAL CHAH COUNTER. 

BNE 12$ ;SKIP ERROR IF NOT TOO MANY RECEIVED. 

MOV R4,ERRNBR jTET ERROR NUMBER TO INITIAL ERRN8R. 

MOV #EM9025.R1 i SELECT THE PROPER ERROR MESSAGE. 

MOV *ER05O3,ERRBLK tSELECT THE PROPER ERROR REPORT ROUTINE. 

; ♦ 

t REPORT ERROR AT INITIAL ERRNBR, 

J "MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED." 



104460 

012767 000001 156604 



i >>>>> ERROR <<<<< . 

TRAP C$ERROR 
I INDICATE THAT AN ERROR HAS BEEN FOUND. 



023420 000477 



025422 012700 070000 
023426 040200 
023430 001016 



ERROR 
MOV Ol.FERROR 

BR 60$ lEXIT THE ROUTINE, WE'RE GIVING UP. 

1 DETERMINF IF THE CHARACTER IS DATA OR A STATUS CODE. 
12$: 



MOV 
BIC 
BNK 



<> 70000, RO 

R2,R0 

14$ 



iGENERATE A BIT MAP OF CHARACTER ERROR HITS 

1 WHICH ARE NOT SET FOR THE CHARACTER. 

(SKIP REPORTING OF ERROR CODE IF WE HAVE ChAR, 



I THE DATA IS LITHER A BMP CODE OR A MODEM STATUS CODE. 

; REPORT THAT THE CODE WAS FQUND. 

{ ERRORS REPORTED WITH ERROR NUMBERS >>^^> ERRNBR* I AND ERRNBR *2 <<<<<» 



NIO 
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^EQ 130 



023464 000416 



023466 
023472 
023500 
023504 
023510 
023512 
023520 



010467 

004 767 
005767 
001404 
032767 
001437 



161624 
000003 
176010 
156514 



4974 023432 010467 

4975 023436 005267 
49 76 023442 004767 
4977 

4978 023446 005767 

4979 023452 001423 

4980 025454 032767 

4981 023462 001456 
4982 
498? 
4984 
4985 
4986 
4987 
4986 
4989 
4990 
4991 
4992 
4993 
4994 
4995 
4996 
499? 
4998 
4999 
5000 
5001 
5002 

5003 025522 

5004 025526 

5005 023530 
5006 
5007 
5008 

5009 025532 

5010 023536 

5011 023542 

5012 023544 

5013 023546 
5014 

5015 023552 

5016 025556 

5017 025560 

5018 023566 
5019 

5020 025570 

5021 0235 74 

5022 023576 
5025 025602 

5024 025604 

5025 025606 

5026 025610 
502^ 025612 
5028 025616 
5029 

5030 023620 010467 1614 72 



161660 
161654 
000222 

156552 

000100 156500 



004767 
1036t.4 
000642 



00^767 
004767 
005002 
005001 
004 767 

005767 
001404 
032767 
001414 

062702 
005201 
120127 
002/61 
005701 
100404 
005002 
012701 
000755 



174726 



MOV 
INC 
JSR 

TST 
BEQ 

BIT 
BEQ 

BR 



R4.ERRNBR 

ERRNBR 

PCREPCOD 

F" ERROR 

16$ 

<^B I T06. OPTION 

60$ 

16$ 



(GET THE ERROR NUMBER PASSED INTO IHIS ROUTINE 
(SET ERROR NUMBER TO INITIAL ERRNBR a. 
(REPORT THE BMP OR MODEM STATUS CHANGE CODE. 

(HAS AN ERROR BEEN DETECTED ? 

[NO, THEN BRANCH, 

(HAS EXTENDED ERROR REPORTING BEEN REQUESTED. 

;YE5, THEN EXIT WITH TEST TAIL MESSAGE. 

(BRANCH TO GET THE NEXT CHARACTER 



THE DATA IS A VALID CHARACTER: 

COMPARE THE READ DATA WITH THE EXPECTED DATA. 

UPDATE EXPECTED DATA POINTER. 

ERRORS REPORTED WITH ERROR NUMBERS >>>>> ERRNBR*3 AND ERRNBW*4 <<<<< 



161616 



14$: 



0001 00 156442 



MOV 


R4, ERRNBR 


ADD 


<>3. ERRNBR 


JSR 


PC.NEWCHR 


TST 


FERROR 


BEQ 


16$ 


BIT 


^IT06. OPTION 


BEO 


60$ 



[CALCULATE THE STARTING ERROR NUMBER f OR THE 

[ NEXT ROUTINE CALL (INITIAL ERRNBR*3). 

[HANDLE THE NEW DATA CHARACTER. 

(HAS AN ERROR BEEN DETECTED ? 

(NO. THEN BRANCH. 

[HAS EXTENDED ERROR REPORTING BEEN REQUESTED 

(YES, THEN EXIT WITH TEST FAIL MESSAGE. 



DONE PROCESSING THIS CHARACTER. 

READ ANOTHER CHAR FROM THE DUT FIFO. 

IF DATA. VALID IS SET, LOOP TO CHECK THE RECEIVED CHARACTER. 

IF DATA. VALID IS CLEAR LOOP TO WAIT FOR IT SET OR TIME-OUT. 



16$ 



I ♦ 



USE 



0007 '6 
O014..2 



175742 
156446 
000100 156374 

000400 
000020 

100000 



18$: 



20$: 



22$ 



60$ 



JSR 


PC.GETCHR 


BCS 


8$ 


BR 


4$ 


MMY CHARACTERS TO FOR 


JSR 


PC.RXIEO 


JSR 


PC.TXDONE 


CLR 


R2 


CLR 


Rl 


JSR 


PC.NEWCHR 


TST 


FERROR 


BEQ 


22$ 


BIT 


V^BIT06, OPTION 


BEQ 


60$ 


ADD 


.7400. R2 


INC 


Rl 


CHPB 


Rl.v^NUMLNS 


Bl T 


20$ 


TST 


Rl 


UMI 


60$ 


CI R 


R2 


MOV 


^n 00000, Rl 


BR 


20$ 


MOV 


R4. ERRNBR 



[READ A CHARACTER KROM THE RX BUFFER. 

[IF DATA. VALID SET. GO TO CHECK THE RX CHAR. 

(LOOP TO WAIT CHAR OR TIME-OUT IF BUFFER EMPTY, 

ANALYSIS OF CHARACTERS IN RESYNC QUEUES. 

(TURN OFF DUT RX INTERRUPTS. 

[CHECK IF TX DONE, TURN OFF DUT TX INTERRUPTS. 

t CLEAR THE DUMMY CHARACTER. 

[CLEAR THE LOOP COUNTER. 

(FORCE ONE RESYNC QUE CHAR TO BE ANALYZED. 

(HAS AN ERROR BEEN DETECTED ? 

[NO, THEN BRANCH. 

[HAS EXTENDED ERROR REPORTING BEEN REQUESTED. 

[YES, THEN EXIT WITH TEST i^ AIL MESSAGE. 

(INCREMENT THE LINE NUMBER IN THE DUMMY CHAR. 

(INCREMENT THE LOOP COUNTER. 

[TEST FOR LOOP COUNTER EQUAL \0 if OF DUT LINES 

[LOOP IF LOOP COUNT IS NOT ALL LINbS DONE. 

[CHECK FOR SECOND TIME AROUND OUTER LOOP. 

[EXIT IF OUTER LOOP DONE TWICE. 

[CLEAR THE DUMMY CHAR FOR 2ND TIME AROUND LOOP 

(CLEAR LOOP COUNT. SET OUTER LOOP Kl.AG. 

ilOOP THE SrCONO TIME AROUND OUTER LOOP. 

[RESTORE THE ERROR NUMBER TO ITS INITIAL VALUE 



B 1 1 
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-^EQ 131 



S051 0^56*>4 
0^5624 



004 736 
00020/ 



PASS 
RTS 



PC 



iRF-STORt GPRS. 
JSR PC.a(SP)* 



I RE TURN TO PRfeCiOS SUBRT. 



C 1 1 



DW 11 FL»NC TST PART4 
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50 5^ 

bO?S? 

S040 
S041 
b04^ 
504 5 
5044 
5045 
5046 

504 7 
5048 
504^ 
5050 
5051 
505c» 
5053 
5054 
5055 

5056 

505 7 
5058 
5059 
5060 
5061 
506,: 
5065 
5064 
5065 
5066 

506 7 
5068 
5069 

5070 



023630 
025630 
023654 
023640 



025642 
023650 



025654 
025654 
023656 

025664 
025664 
023666 



004567 

016702 
001411 



012 767 
012701 



104460 
01276V 
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ROMAS T - 



161470 
156424 



015504 
012377 



161452 



000001 156540 



SB TU GLOBAL SlJBROUTINE - ROMAS T - 

- REPORT DMA START BIT ERRORS ROUTINE - 
THIS SUeROUTINF. CHECKS TOR LINES WHICH HAVE DMA START BIT ERRORS 
DURING THE JUST COMPLETED DMA TRANSMISSION, IK ANY ARE KOUND. 
THEY ARE REPORTED. 

INPUTS! ERRM5G - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 
ERRNBR - ERROR NUMBER Of ERROR REPORTED IN THIS ROUTINE. 
TXINTF - CONTAINS BIT MAP OF LINES WITH DMA. START BIT ERRORS. 

OUTPUTS: ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQUENCE: JSR PC.RDMAST 

COMMENTS: IF NO LINES HAVE DMA .START BIT ERRORS, NO MESSAGES ARE PRINTED. 

SUBORDINATE ROUTINES CALLED: ER9102. 



ROMASTii SAVE 





JSR 


MOV 


TXINTF. R2 


BEQ 


60 1 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 iCALL REGTSTER SAVE SUBRT. 
iGET COPY OF THE DMA START ERRORS BIT MAP. 
iEXIT IF NO DMA_STARf ERROR BITS ARE SET. 

I WE HAVE SOME DMA^TART BIT ERRORS TO REPORT. 

MOV OER9102. ERRBLK (SELECT THE ERROR REPORTING ROUTINE. 

MOV #EM9102,Rl (INDICATE THAT WE HAVE DMASTART BIT ERROR. 

i REPORT "DMA^START BIT SET AFTER RESET OR TX, ACTION ... ON LINESCS:):" 

I - 

ERROR t >>>>> ERROR <<<<<. 

TRAP TERROR 
MOV ^l.FfcRROR (INDICATE AN ERROR HAS BKN DETECTED. 



004 7 56 
000207 



60 J 



PASS 
RTS 



PC 



(RESTORt GPRS, 
JSR PC.aCSP)* 



SEGJ 132 



iRETURN TO PREG05 SUORT. 



Dii 



mnk' m^&o^m."'''' 


MACRO ^ 


^o:^ 








50 ; 5 








so '4 








50'? 








so 76 








so.v 








50:'8 








SO'^ 








SOt^O 








5081 








508." 








5085 








5084 








5085 








5086 








508 7 








5088 








508^ 








5090 








5091 








5092 








5095 








5094 


025670 








023670 


004567 


161430 


5095 


025674 


012767 


014420 


5096 


025702 


016703 


161410 


5097 


023706 


010204 




5098 


025710 


000504 




5099 


023712 


042704 


177760 


5100 








5101 








5102 








5103 


025716 


012701 


011173 


5104 


025722 


032702 


000001 


5105 


023726 


001422 




5106 


023 750 


005267 


161562 


5107 


023734 


012701 


0U215 


5108 


023740 


012700 


000300 


5109 


023744 


040200 




5110 


023 746 


001003 




5m 


025750 


004 76? 


000604 


5112 


023754 


000425 




5115 


023 756 


122702 


000201 


5114 


023762 


O01416 




5115 


025 764 


122702 


000203 


5116 


025770 


001413 




511/ 


023772 


C00400 




5118 








5119 








5120 








5121 


025 7 74 


042702 


177400 


5122 


024000 


O04 767 


002154 


5125 


024004 








024004 


104460 




5124 


024006 


012767 


000001 


5125 








5126 


024014 


004767 


002200 
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SEQ 133 



BTTL GLOBAL SUBROUTINE - REPCOD - 

- ROUTINE TO REPORT ERROR CODE FROM OUT - 
THIS ROUTINE REPORTS AN ERROR CODE WHICH HAS BEEN READ FROM THE DUT 
FIFO. THE CODE IS CHECKED TO DETERMINE WHETHER IT IS A SELFTEST CODE 
AN MODEM STATUS CHANGE CODE OR A BMP CODE. THIS ROUTINE ASSISES THAT 
THE CODE INDICATES AN ERROR » IF A BMP CODE IS FOUND IT IS NOT REPORTED 
IMMEDIATELY. BUT IS SAVED ON THE BMP CODE QUEUE TO BE REPORTED LATER. 



INPUTS: 



R2 - CONTAINS THE ERROR CODE COMPLETE WITH FLAGS AND LINE it, 
ERRTBL - ERRTYP.ERRNBR.ANO ERRMSG SET UP CORRECTLY. 



OUTPUTS: 

CALLING SEQUENCE: 



ERR8LK - VALUE MAY BE DESTROYED. 

BMPCQP - MAYBE UPDATED IF A BMP CODE IS ADDED TO THE QUEUE. 



JSR 



PC.REPCOD 



COMMENTS: ERRNBR IS RESTORED TO ITS ENTERING VALUE BY THIS ROUTINE. 

THIS ROUTINE REPORTS ERRORS WITH NUMBERS ERRN8R THRU ERRNBR^l. 



SUBORDINATE ROUTINES CALLED: ER9001 . 5AVBMP . 



** 



REPCODt: SAVE 



161420 



I * 



I • 



2$: 



RFPORT 



4$; 



156210 





JSR 


MOV 


*ER9001.ERRBLK 


MOV 


ERRNeR.R3 


MOV 


R2.R4 


SWAB 


R4 


BIC 


©177760, R4 


INE THE 


TYPE OF CODE W 


MOV 


<>EM9005.R1 


BIT 


^IT0,R2 


BEQ 


4$ 


INC 


ERRNBR 


MOV 


<>E.M9004,R1 


MOV 


0500, RO 


BIC 


R2.R0 


BNE 


21 


JSR 


PC.SAVBMP 


BR 


60 « 


CMPB 


#201, R2 


BEQ 


6) 


CMPB 


0205, R2 


BFQ 


61 


BR 


4$ 


"UNEXPECTED XXXXX COD 


BIC 


0177400, R2 


JSR 


PC, TXROFF 


ERROR 




HOV 


Ol.FERROR 


JSR 


PC.TXRON 



(SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 iCALL REGISTER SAVE SUBRT 
(SELECT THE ERROR REPORTING ROUTINE, 
(PRESERVE THE ERROR NUMBER. 
(EXTRACT THE LINE NUMBER FIELD 
t FROM THE ERROR CODE WHICH WAS 
I PASSED INTO THIS ROUTINE. 



(SELECT MODEM STATUS CODE MESSAGE. 

(TEST THE MODEM STATUS INDICATION BIT. 

(GOTO REPORT ERROR IF MODEM STATUS CODE. 

(SELECT THE SELFTEST CODE ERROR NUMBER, 

(SELECT SELFTEST CODE MESSAGE. 

[CHECK IF SELF -TEST OR BMP CODE. 

(TRY TO CLEAR BMP BITS. 

(GO CHECK FOR SELFTEST CODE IF NOT BMP. 

(SAVE THE BMP CODE ON THE QUEltE . 

(EXIT THIS ROUTINE. 

(CHECK FOR SELF TEST NULL CODE. 

(EXIT ROUTINE IF NUL.L CODE FOUND. 

(CHECK FOR SKIP SELF TEST CODE. 

(EXIT ROUTINE IF SKIP SELF TEST CODE FOUND. 

(GO REPORT SELF TEST ERROR. 

CODE FOUND IN RECEIVE CHAR FIFO." 

iREMOVt UPPER BYTE OF CODE TO BE REPORrtO. 
(TURN OFF TX AND RX DURING ERROR REPORTING. 
( •» v>^ V ERROR <i.<<s , 

TRAP CJERRQR 

lINDICATF THAT AN ERROR HAS BEEN FOUND* 



(TURN TX AND RX BACK ON. 



Ell 



'^ut 'sH^SoiifiNi'^"'' "'^'° '''ntphho^^'''' '""''' ''""^ ^"• 



^EQ 134 



51^7 

5150 024020 010367 161272 

5131 

5133 024024 

024024 004 736 

5133 024026 000207 



! RESTORE THE INITIAL EPROR NUMBER. 
65: MOV R3.ERRNBR 



60* : 



PASS 
RTS 



PC 



iRESTORE GPRS 
JSR PC.aCSP)* 



;RETiJRN TO PREG05 SUBRT. 



Fil 
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SEQ 135 



5135 
5136 
5137 
5133 
5139 
5140 
5141 
5142 
5143 
5144 
5145 
5146 
5147 
5148 
5149 
5150 
5151 
5152 
5153 
5154 
5155 
5156 
5157 
5158 
5159 
5160 
5161 

5162 
5163 
5164 
5165 
5166 
5167 
5168 
5169 
5170 
5171 
5172 

5175 

5174 



024030 

024030 004567 161270 

024034 005767 156440 

024040 001404 



024042 012767 015070 161252 



024050 

024050 104460 



024052 
024052 004 736 
5175 024054 000207 



.SBTTL r;LC3AL SUBROUTINE - REPSMR - 

I* - REPORT ERROR SUMMARY ROUTINE - 

I* THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAVE 

:* EXCEEDED THE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 

i* IN A SINGLE TEST. THIS PARAMETER CAN BE SPECIFIED BY THE OPERATOR IF 

;♦ HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS. 

i* 

ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE. 

ERRN6R - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 

ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS. 



J* INPUTS: 

i* 

;♦ 

J* 

;* 

I* OUTPUTS: 

;* 

;♦ 

;♦ CALLING SEQUENCE: 



ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED). 
SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE, 



JSR 



PC, REPSMR 



;* 

i* COMMENTS: IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 
1* ERRORS TO REPORT. NO MESSAGES ARE PRINTED BY THIS ROUTINE. 

I* ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 

J* THE CONTENTS OF ERRBLK ARE DESTROYED. 

J* 

;* SUBORDINATE ROUTINES CALLED: 



REPSMR:: SAVE 



TST 
BEQ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 
ERSMRF jCHECK THE "PRINT LINE ERROR SUMMARY" FLAGS, 

60$ tEXXT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 



I * 



WE HAVE SOME ERROR SUMMARIES TO REPORT, 

MOV 0ER9004, ERRBLK (SELECT ERROR REPORTING ROUTINE. 

! REPORT 

J "ERRUR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:" 



60$: 



ERROR 

PASS 
RTS 



PC 



jRESrORE GPRS. 
JSR PC.5)CSP)f 



TRAP CiERKdR 
(RETURN TO PREG05 SUBRT 



Gil 
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SEQ 136 



5ir; 

5178 
5179 
5100 
5181 
518J: 
518? 
5164 
5185 
5186 
5167 
5188 
5189 
5190 
5191 
5192 

5194 
5195 
5196 
5197 
5198 
5199 
5200 
5201 
5202 

5203 
5204 
5205 
5206 
5207 
5208 
5209 
5210 
5211 
5212 
5213 
5214 
5215 
5216 
5217 
5218 
5219 
5220 
5221 
5222 
5223 
5224 
5225 
5226 
5227 
5228 
5229 
5250 
5231 
5232 



024056 
024056 
024062 



024066 
024072 
024074 
024076 
024100 
024104 
024110 



024112 
024116 



024122 
024124 
024130 
024134 



SBTTL GLOBAL SU8R0UTiNE - RESETT - 

* - RESET DEVICE UNDER TEST - 

♦ THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 

♦ IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, THEN 

* AN ABORT TEST ERROR MESSAGE IS REPORTED. 

* 

CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 

ERRTBL- ERRTYP.ERNBR.AND ERRMSG SET UP CORRECTLY. 



* INPUTS: 

* 
* 

* OUTPUTS: 

* 

* 

« 

:* 

* 

,* 



THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

ERRBLK - VALUE MAY BE DESTROYED. 

lESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



CALLING SEQUENCE: 



JSR 



PC.RESETT 



COMMENT! 



THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNDR. 



SUBORDINATE ROUTINES CALLED: DELAY .MSLGET . 



*4i****4i«*4i***4iiK4i*'fc4>4i>|i4>4i*i*>*"«'4i<l>«4[j(<*4i**'*>*4>>tL***f**4i****4i*4<44>*4i*****4i4*****4i*4'*4(*4* 



004567 

012702 



161242 
000040 



RESETT: : SAVE 
MOV 



JSfl 
#6IT05,R2 



J SAVE CONTENTS OF GPRS RO THRU P5 . 
R5.PREG05 ;CALL REGISTER SAVE SUBRT 
;SET BIT MASK OF MASTER RESET BIT, 



t * 



i 



016704 
030214 
001406 
005003 
012701 
004767 
103012 



156106 



011610 
174764 



; ♦ 



010277 
004767 



156062 
000504 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 
IF MR IS SET THEN WAIT FOR SELF -TEST TO COMPLETE. 
IF TIME-OUT OCCURS. REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR. 

(GET IHE ADDRESS OF THE DUT'S CSR. 

(CHECK STATE CF MASTER RESET BIT. 

(DON'T DELAY IF MR IS ALREADY CLEAR. 

(SET UP DESIRED STATE OF MASTER RESET BIT. 

:PASS TIME-OUT VALUE OF 5 SECONDS. 

iWAIT FOR SELF-TEST TO COMPLETE. MR CLEAR. 

I GO REPORT ERROR IF TIMEOUT OCCURRED. 

SET MASTER RESET BIT IN CSR. CLEAR TX AND RX ENABLE BITS. ETC. 
SKIP THE SELFTEST. 
TIME-OUT OF 5 SECS, vJUST IN CASE THE SELF -TEST EXECUTES. 



MOV 


CSRA.R4 


BIT 


R2,CR4) 


BEQ 


2$ 


CLR 


R3 


MOV 


*5000. .Rl 


JSR 


PC, MSLGET 


BCC 


4$ 



2$: 



MOV 
JSR 



R2.CDCSRA 
PC.SKPSTS 



(SET MASTER RESET BIT. DISABLE TX AND RX INTS 
(TRY TO SKIP THE SELFTEST. 



005003 
012701 
004 767 
103410 



011610 
174740 



SET SELF-TEST TIME-OUT OF 5 SECONDS. AND WAIT FOR M.R TO CLEAR. 

IF TIME-OUT OCCURS. THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 

TEST INDICATOR. 

(SET UP DESIRED STATE OF MASTER RESET BIT. 
(PASS TIME-OUT VALUE OF 5 SECONDS. 
(WAIT FOR SELK-TEST TO COMPLETE. MR CLEAR. 
(SKIP ERROR REPORT IF MR CLEARED IN TIME. 



CLR 


R3 


MOV 


*5000. ,R1 


JSR 


PC, MSLGET 


BCS 


6$ 



QHy-11 FUNC TST PAPT4 
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krr- 



SEQ 137 



5235 
5254 
5235 
5256 
5237 
5238 
5239 
5240 
5241 

5242 
5243 
5244 
5245 
5246 
5247 
5248 
5249 
5250 
5251 

5252 
5253 
5254 



! ¥ 



024136 
024142 



024150 
024150 
024152 
024154 



024156 
024162 

024164 
024164 

024166 



012701 
012767 



104460 
000241 
000403 



005067 
000261 



004736 
000207 



010111 
014070 



161152 



156052 



i SET UP ERROR MESSAGE TO REPORT "FATAL ERROR FOUND DURING RESET, TEST ABORTED". 
I INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT. 



4$ 



MOV #EM1601.R1 tPASS ERROR MESSAGE TO REPORT. 

MOV #ER1603,ERRBLi< (PASS ADDRESS OF ERROR HANDLING ROUTINE. 

jREPORT ERROR "TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR" 

t "TEST ABORTED" 

ERROR ; >>>>> ERROR <<<<< 

TRAP CJERROR 



CLC 
BR 



60$ 



; INDICATE TEST IS TO BE ABORTED. 

:EXIT THIS SUBROUTINE. ABORT TEST INDICATOR. 



1 CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN lESTAT. 
! EXIT WITH CONTINUE TEST INDICATOR SET (IE. CARRY SET). 



6$: 

60$ J 



CLR 
SEC 

PASS 



RTS 



lESTAT 



JSR 



PC 



;CLEAR TX AND RX INTERRUPT STATUS FLAGS. 
(INDICATE SUCCESS, CONTINUE TEST. 

I RESTORE GPRS, PASS THE FOLLOWING INTACT: 
PCaCSP)* :RETURN TO PREG05 SUBRT 

J CARRY BIT: IF CLEAR. INDICATES ABORT TEST. 



1 1 1 



DHU 11 fUNC TST 


PART4 


MACRO t 


GLOBAL Sl^BROUTINE 




5^56 






^^"^7 






5^58 






^l'^-^ 






s^to 






5261 






s^6^ 






5^:6? 






5c'64 






52h5 






b?bb 






526:- 






52o3 






s^e^^ 






52^0 






SrVi 






^2^2 






5273 






5274 






5275 






5276 






5277 






5278 






5279 






5280 0241 '0 






024170 


004567 


161130 


5281 024174 


010502 




5282 024176 


046702 


156302 


5283 024202 


001413 




5284 






5265 






5286 






528 7 024204 


012767 


015204 


5288 024212 


012701 


0U661 


5289 024216 


012704 


003542 


5290 






5291 






5292 






5293 






5294 






5295 024222 






024222 


104460 




5296 024224 


012767 


000001 


5297 






5298 024232 






024232 


004 756 




5299 024234 


000207 
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RRXNDN - 



SEQ 138 



.SBTTL GLOBAL SieROUTINE - RRXNDN - 

* - REPORT RECEPTION NOT COMPLETED ROUTINE - 

* THIS SUBROUTINE CHECKS FOR LINES WHICH DID NOT RECEIVE THE COMPLETE 

* DATA PATTERN. If ANY ARE FOUND, THEY ARE REPORTED. 
* 

R5 - LOCAL ACTIVE LINES BIT MAP. 

DPLENB - BASE OF TABLE OF DATA PATTERN LENGTHS. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 

ERRN8R - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 

RXCNTB - LABEL AT BASE OF THE RX CHARACTER COUNTERS TABLE. 

RXDONF - RECEPTION DONE FLAGS. 



t* INPUTS: 

* 

* 

* 

• OUTPUTS: 

* 

* CALLING SEQUENCE: 



ERRBLK ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



JSR 



PC. RRXNDN 



I* 

* COMMENTS: IF NO LINES FAILED TO COMPLETE THEIR RECEPTION, NO MESSAGES 

* ARE PRINTED. 

* SUBORDINATE ROUTINES CALLED: ER9005. 



RRXNDN: : SAVE 

MOV 
BIC 
BEQ 



JSR 
R5,R2 
RXDONF, R2 
60$ 



;SAVE CONTENTS Of GPRS RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SU6RT. 
iGET COPY OF THE LOCAL ACTIVE LINES BIT MAP. 
(GET MAP OF ACTIVE LINE.S WITH RX DONE FLAG CLR. 
lEXlT 1^ NO ACTIVE LINES HAVE RX DONE FLAG CLR. 



161110 



WE HAVE SOME "RX NOT COMPLETED" ERRORS TO REPORT. 



MOV ^R9005. ERRBLK 

MOV *EM9016.R1 

MOV *RXCNTB.R4 



I SELECT THE ERROR REPORTING ROUTINE. 

t INDICATE THAT WE ARE DEALING WITH RECEPTION. 

iPASS BASE OF RX CHAR COUNTERS TABLE TO ER9005. 



REPORT "SINGLE CHARACTER MODE TE'JT ERROR:*' 

-DATA PATTERN NOT COMPLETELY RECEIVED ON ALL LINES:" 



155772 



60$ 



ERROR 

MOV 
PASS 



TRAP 



<?1,FERR0R 

JSR 

PC 



CJERROR 



i INDICATE AN ERROR HAS BEEN FOUND. 

i RE STORE GPRS. 

PC.aCSP:)* ;RETURN TO PREG05 SUBRT 



Jll 
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SEQ 139 



S?01 
53502 
5503 
5504 
5305 
5306 
5307 
5308 
5309 
5310 
5311 
5312 
5313 
5314 
5315 
5316 
5317 
5318 
5319 
5320 
5321 
5322 
5323 
5324 
5325 

5326 
5327 
5328 
5329 
5330 
5351 
5332 
5333 
5334 
5335 
5336 
5357 
5338 
5359 
5340 
5341 

5342 
5345 
5344 

5345 



024236 
024236 
024242 
024244 
024250 



024252 
024260 
024264 



024270 
024270 
024272 

024300 
024300 
024302 



004567 
010502 
046702 
001413 



012767 
012701 
012704 



161062 
156232 



015204 
011645 
003502 



.SBTTL GLOBAL SUBROUTINE - RTXNON - 

I* - REPORT TRANSMISSION NOT COMPLETED ROUTINE - 

;♦ THIS SUBROUTINE CHECKS FOR LINES WHICH DID NOT TRANSMIT THE COMPLETE 

;♦ DATA PATTERN. IF ANY ARE FOUND, THEY ARE REPORTED. 

;♦ 

R5 - LOCAL ACTIVE LINES BIT MAP. 

DPLENB - LABEL AT BASE OF DATA PATTERN LENGTH TABLE. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 

ERRNUR ■ ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 

TXCNTB - LABEL AT BASE OF THE TX CHARACTER COUNTERS TABLE. 

TXDONF - TRANSMISSION DONE FLAGS. 



i* INPUTS: 

J* 

J* 

J* 

i* 

;* 

(* 

J* OUTPUTS: 

;* 

I* 

I*- CALLING SEQUENCE; 



ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



JSR 



PC. RTXNDN 



J* 

;♦ COMMENTS: IF NO LINES FAILED TO COMPLETE THEIR TRANSMISSION. NO MESSAGES 

I* ARE PRINTED. 

t* 

t* SUBORDINATE ROUTINES CALLED: ER9005. 



RTXNDN: i SAVE 

MOV 
BIC 
BEQ 



JSR 
R5.R2 
TXDONF. R2 
60S 



J SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 J CALL REGISTER SAVE SUBRT. 
iGET COPY OF THE LOCAL ACTIVE LINES BIT MAP. 
(GET MAP OF ACTIVE LINES WITH TX DONE FLAG CLR . 
J EXIT IF NO ACTIVE LINES HAVE TX DONE FLAG CLR. 



i WE HAVE SOME "TX NOT COMPLETED" ERRORS TO REPORT. 



161042 



MOV <»£R9005. ERRBLK 
MOV *EM9015,Rl 
MOV ftTXCNTB.R4 



J SELECT THE ERROR REPORTING ROUTINE. 

(INDICATE WE ARE DEALING WITH TRANSMISSION. 

J PASS BASE OF TX CHAR COUNTERS TO TABLE ER0805 . 



REPORT -SINGLE CHARACTER MODE TEST ERROR:" 

"DATA PATTERN NOT COMPLETELY TRANSMITTED ON ALL LINES:" 



t - 



104460 
012767 



004 736 
000207 



000001 155724 



60$ 



ERROR 

MOV 
PASS 
RTS 



fll.FERROR 

JSR 
PC 



>>>>> ERROR < <<<< . 

TRAP CiERROR 
INDICATE THAT AN ERROR HAS BEEN FOUND. 



RESTORE GPRS. 

pc.acspn 



iRETURN TO PREG05 SUBRT. 



Kll 



OHU-11 FUNC TST PART4 
GLOBAL SUBROUTINE 



S347 
5348 
5349 
5350 
5551 
5552 
5353 
5354 
5355 
5356 
5357 
5358 
5359 
5360 
5361 
5362 
5363 
5364 
5365 
5366 
5367 
5368 
5369 
5370 



5371 
5372 
5373 
5374 
5375 
5376 
5377 
5378 
5379 
5380 
5381 
5382 
5383 
5384 
5385 
5386 
5387 
5386 
5389 
5390 
5391 
5392 
5395 
5394 
5395 
5596 



5397 
5398 



024304 
024304 
024310 
024312 
024316 
024322 
024326 
024332 



024334 
024340 
024344 
024346 



024350 
024352 
024 354 
024360 
024362 
024364 
024366 

024370 
024370 
024574 



004567 
010500 
012701 
016702 
012703 
016704 
005005 



010477 
032712 
001401 
050105 



030100 
001402 
042712 
005204 
006301 
005503 
001362 



010566 
004 756 
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- RXDSBL - 



SEQ 140 



SBTTL GLOBAL SUBROUTINE - RXDSBL - 



- DISABLE RECEIVERS - 
THIS SUBROUTINE IS USED TO DISABLE RECEPTION ON SELECTED LINES BY, 
CLEARING THE ASSOCIATED RX_ENABLE BIT ON THE OUT. 

INPUTS: R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR RX.ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR . 

lESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
LNCTRA - CONTAINS THE ADDRESS OF THE LNCTRL REGISTER. 

OUTPUTS: R5 - BIT'S SET INDICATE INITIAL STATES OF ALL RX.ENBLE BITS. 
LNCTRA • THE STATE OF THE RX ENBLE BIT MAY BE ALTERED. 
THE CONTENTS OF THE IND_ADO_REG FIELD IN THE CSR ARE DESTROYED. 

CALLING SEQUENCE: JSR PC, RXDSBL 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



161014 
000001 

155666 
000020 
15570C 



155640 
000004 



RXDSBL: : SAVE 

MOV 
MOV 
MOV 
MOV 
MOV 
CLR 



JSR 
R5,R0 
^»61TC,R1 
LNCTRA, R2 
#NUMLNS.R3 
IESTAT.R4 
R5 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SU6RT. 
jCOPY BIT MAP OF LINES TO DISABLE RECEPTION. 
(INITIALIZE THE SELECTED LINE BIT MASK. 
iGET THE ADDRESS OF THE LNCTRL REGISTER. 
I GET MAXIMUM LINE NUMBER PLUS ONE. 
iGET THE STATES OF THE INT ENABLE BITS. 
iLOG POSSIBLE RX DISABLED ON ALL LINES. 



SELECT EVERY LINE IN TURN. AND LOG THE STATE OF EACH RX..ENABLE BIT. 



2$: 



MOV R4,aCSRA 

BIT />BIT2.CR2) 

BEQ 4$ 

BIS R1.R5 



i WRITE TO DUT CSR TO SELECT LINE REGISTERS. 
1 CHECK STAVE OF RX ENABLE BIT ON SELECTED LINE 
iSKID NEXT INSTRUCTION IF RX ENABLE CLEAR. 
iLOG RX ENABLE BIT SET FOR SELECTED LINE. 



CLEAR RX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE RX DISABLE 
LINE BIT MAP. 



000004 



000014 



4$: 
60$: 



02437€. 000207 



BIT 
BEQ 

BIC 
INC 
ASL 
DEC 
BNE 

PASS 



RTS 



Rl.RO 

6$ 

^BIT2,CR2) 

R4 

Rl 

R3 

2$ 



(CHECK STATE OF DISABLE LINE BIT MAP. 
(BRANCH IF THIS LINE TO REMAIN UNALTERED. 
(CLEAR RX ENABLE BIT ON SELECTED LINE. 
(PREPARE TO SELECT REGISTERS FOR NEXT LINE. 
(SHIFT BIT MAP FOR NEXT LINE. 
(DECREMENT LINE NUMBER. 
(LOOP TO CHECK NEXT LINE. 



R5 



PC 



MOV 
JSR 



(RESTORE GPRS. EXCEPT 

R5.R5SL0T(SP) 

PC.aCSP)* 

iR5 - PREVIOUS STATES 



iPUT R5 IN STACK SIOT. 
(RFTURN TO PRFGO^ Si^^BRV 
OF ALL RX^ENABLE BITS» 



Lll 



DHU 11 FUNC TST PART^ 
GLOBAL SUBROUTINE 



5400 
5401 
5402 
5403 
5404 
5405 
5406 
5407 
5408 
5409 
5410 
5411 
5412 
5413 
5414 
5415 
5416 
5417 
5418 
5419 
5420 
5421 
5422 
5423 



5424 
5425 
5426 
5427 
5428 
5429 
5430 
5431 
5432 
5433 
5434 
5435 
5436 
5437 
5438 
5439 
5440 
5441 
5442 
5443 
5444 
5445 
5446 
5447 
5448 
5449 



5450 
5451 
5452 



024400 
024400 
024404 
024406 
024412 
024416 
024422 
024426 



024430 
024434 
024440 
024442 



024444 
024446 
024450 
024454 
024456 
024460 
024462 

024464 
024464 
024470 



004567 
010500 
012701 
016702 
012703 
016704 
005005 



010477 
032712 
001001 
050105 



030100 
001402 
052712 
005204 
006501 
005303 
001362 



010566 
004736 
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- RXENBL - 



^EQ 141 



SB 
» f 

* 

*■ 

*■ 
* 



TTL GLOBAL SUBROUTINE ■- RXENBL - 

- ENABLE RECEIVER - 
THIS SUBROUTINE IS USED TO ENABLE RECEPTION ON SELECTED LINES BY 
SETTING THE ASSOCIATED RX. ENABLE BIT ON THE OUT. 



INPUTS: 



OUTPUTS: 



R5 - BIT'S SET CORRESPOND TO LINES ON UHICH TO SET RX, ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE OUT CSR. 

lESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS TN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
LNCTRA - CONTAINS THE ADDRESS OF THE LNCTRL REGISTER. 

R5 - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 

LNCTRA - THE STATE OF THE RX. ENABLE dIT MAY BE ALTERED. 

THE CONTENTS OF THE IND.ADO.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. RXENBL 



SUBORDINATE ROUTINES CALLED: NONE. 



160720 

000001 
155572 
000020 
155606 



155544 
000004 



RXENBL: : SAVE 

MOV 
MOV 

MOV 
MOV 
MOV 
CLR 



JSR 
R5.R0 
*BIT0,R1 
LNCTRA. P2 
*NUMLN5,R3 
IESTAT,R4 
R5 



I SAVE CONTENTS OF GPRS RO THRU R5 . 

R5.PREG05 ;CALL REGISTER SAVE SUBRT. 

J COPY BIT MAP OF LINES TO ENABLE. 

I INITIALIZE THE SELECTED LINE BIT MASK. 

iGET THE ADDRESS OF THE LNCTRL REGISTER. 

(GET MAXIMUM LINE NUMBER. 

iGET THE STATES OF THE INT ENABLE BITS. 

i CLEAR RX. ENABLE BIT LOG OF DISABLED LINES 



SELECT EVERY LINE IN TURN. AND LOG ANY RX.ENBLE BIT THAT IS CLEAR. 



2$: 



MOV R4,aCSRA 

BIT ^IT2.CR2) 

BNE 4$ 

BIS R1.R5 



lURITE TO OUT CSR TO SELECT LINE REGISTERS. 
(CHECK STATE OF RX. ENABLE BIT ON SELECTED LINE 
tSKIP NEXT INSTRUCTION IF RX. ENABLE SET. 
iLOG RX ENABLE BIT CLEAR FOR ^'ELECTED LINE. 



000004 



000014 



024472 000207 



SET RX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE HX ENABLE 



i CHECK STATE OF RX . ENABLE LINE BIT MAP. 
jBRANCH IF THIS LINE TO REMAIN UNALTERED. 
I ENABLE RECEPTIONON SELECTED LINE. 
(PREPARE TO SELECT REGISTERS FOR NEXT LINE, 
i SHIFT BIT MAP FOR NEXT LINE. 
; DECREMENT LINE NLflBER . 
(LOOP TO CHECK NEXT LINE. 

(RESTORE GPRS. EXCEPT 

R5,R5SL0T(5P) (PUT R5 IN STACK SLOT. 

PC.aCSP)* (RETURN TO PREG05 SUBRT. 

lR5 - LINE BIT MAP CORRESPONDING TO THE 

I PREVIOUS LINES THAT WERE DISABLED, 





LINE BIT 


IbLt- UN LiNtb I 
MAP. 


4$: 


BIT 


H1,P0 




BEQ 


6% 




BIS 


<>BIT2.(R2) 


6$: 


INC 


R4 




ASL 


Rl 




DEC 


R3 




BNE 


2i 


60$ 


PASS 


R5 

MOV 
JSR 



RTS 



PC 



DHU^ll FUNC TSI 
GLOBAL SUBROUTI 


PART4 
ME 


MACRO M1200 1 


M54 








5455 








54S6 








5457 








5458 








5459 








5460 








5461 








IA62 








5465 








5464 








5465 








5466 








5467 








5468 








5469 








54 70 








5471 








5472 


024474 


010046 




5473 


024476 








024476 


104440 






024500 


010046 




5474 


024502 








024502 


012700 


000340 




024506 


104441 




54 75 


024510 


042767 


137777 155516 


5476 


024516 


016777 


155512 155454 


5477 


024524 








024524 


012600 






024526 


104441 




5478 


024550 


012600 




5479 


024532 


000207 





Mil 
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SEG 142 



- RECEIVER INTERRUPT DISABLE - 
THIS ROUTINE IS USED TO DISABLE RECEIVER INTERRUPTS IN THE DHUll. 



.SB"U. GLOBAL SUBROUTINE - RXIEO 

J* 
J* 

i* 
;♦ 

!♦ 
i* 
1* 

:♦ 



INPUTS: 
OUTPUTS: 



NONE. 

THE RX.INT.ENBL BIT IS CLEARED IN THE OUT CSR. 

lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

ENABLE BITS. 



JSR 



PC, RXIEO 



t+ CALLING SEQUENCE: 

I* 

I* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD 



IN 



J* 
;* 
:* 



THE OUT CSR ARE DESTROYED. 



SUBORDINATE ROUTINF.S CALLED: NONE. 



RXIEO:: MOV RO. -(SP) 
GETPRI -CSP) 



SETPRI 0PRI07 



I SAVE CONTENTS OF RO ON THE 
I SAVE PROCESSOR PRIORITY ON 



BIC #137777. IE5TAT 
MOV lESTAT.aCSRA 
SETPRI (SP)* 



MOV 
RTS 



(SP)f.RO 
PC 



STACK. 
STACK. 

TRAP CJGPRI 
MOV RO. -CSP) 

[IGNORE ANY INTERRUPT THAT MAY BE GENERATED. 

MOV #PR I07.ro 
TRAP CJSPRI 

iCLEAR RX.INT.ENBL BIT IN lESTAT. 

tDISABLE RX INTERRUPTS. 

jENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SPn.RO 
TRAP CJSPRI 

jRESTORE RO. 



DHU-ll FUNC TST PART4 
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Nil 
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- RXIEl - 



SEQ 14i 



S481 
548? 
5483 
!3484 
5485 
5486 
5487 
5468 
5489 
5490 
5491 
54')2 
5495 
5-A94 
5495 
54<>-6 
549 7 
5498 
5499 
5500 
5501 
550? 
5503 



024554 052767 000100 1554 /j 

0.?4542 042767 137677 155464 

0^4550 016777 155460 155422 

024556 000207 



.SBTTL GLOBAL SUBROUTINE ■■ RXIEl 

{* - RECEIVER INTERRUPT ENABLE - 

i* THTS ROUTINE IS USED TO ENABLE RECEIVER INTERRUPTS IN THE DHUll. 

{* 

;* INPUTS: NONE. 

:* 

[♦ OUTPUTS: THE RX.INT.ENBL BIT IS SET IN THE OUT CSR. 

:♦ lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

:* ENABLE BITS. 

J* CALLING SEQUENCE: JSR ^C. RXIEl 

• * 

J* COMMENTS: THE CONTEN : ; 7. INDIRECT ADDRESS REGISTER FIELD IN 

i* THE DUT CSI; . c .tSINUTED. 

I ♦ 

I* SUBORDINATE ROUTINES CALLED: NONE. 



RXIEl: ! BIS *6IT06.IESTAT 

BIC #137677. lESTAT 

MOV lESTAT.SCSRA 

RTS PC 



iSET RX.INT.ENBL BIT IN lESTAT. 

J CLEAR ALL OTHER BITS. EXCEPT TX AND RX I.E. 

:ENABLE RX INTERRUPTS. 



DW U KiNC TST PrtRT4 
GLOBAL SlWOUTINa 

ssos 

5510 
5511 
55 Iv^ 
5515 
5514 
551^^ 

55l^ 

551 : 

5Mt< 
551'> 

55^^0 



55JJ 
55^5 
5524 
5525 
5526 
5527 
5528 

5529 
5550 
5551 
5552 
5555 
5554 
5555 
5556 
55 5: 
55 ^« 
555^ 



024560 
024560 
024564 
024570 
024574 
024576 
024602 
024604 
024610 
024612 
024616 

024622 
024622 
5540 024624 



004567 
016704 
116724 
005204 
042 702 
010224 
020427 
105402 
162704 
010467 



004 7 56 
000207 



B 1 c' 



MACRO H1200 15 MAR 84 0'»t4rt PAGE ^^ 
SAVBMP 



SECJ 144 



.SBTTL. GLOBAL SUBROUTINE - SAVBMP 

SAVE BMP COOES ROUTINf 
THIS ROUTINE SAVES THE PARAMETER PASSED IN. ONTO THE BMP CODF. QUEUF 
TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING TEST. 



INPUTS: 



OUTPUT^j 



R2 CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEiJE . 

BMPCQP - CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUfUf.. 

BMPCOe - LABEL AT BASE OT THE BMP CODE OUE»JE . 

BMPCQE - LABEL OT NEXT LOCATION AFTER THE END Of THE BMP QUEUE. 

TSTNUM CONTAINS THE NUMBER OF THE CURRENT TEST. 

BMPCOP INCREMENTED BY 4. 

\H€ CONTENTS OF THt BMP CODE QUEUt ARE 'BOATED. 



CALLING SEQUENCE: 
COMMENTS: 



JGR 



PC. SAVBMP 



ir THt OVERfLOW OCCURS THEN THE I AST lOCATlON WiLl BE 
OVERWRITTEN BY ANY SUBSEQUe.NT ATTEMPTS To UPDATE THE QUEUE. 



SUBORDINATE ROUTINES CALLED: NONE. 



160540 
155720 
155464 

17 7400 

002712 

0O0004 
155666 



SAVBMP; : SAVE 



MOV 
MOVB 
INC 
BIC 
MOV 
CMP 
HLO 
SUB 
MOV 



2«: 
60$ 1 



JSR 
BMPCQP, R4 
TSTNUM. (R4)» 
R4 

017 7400.R2 
R2.(R4)» 
R4.WMPCQE 
21 

04. R4 
R4. BMPCQP 



iSAVE CONTENTS Of GPRS RO THRU R5. 
R5,PREG05 iCALL REGISTER SAVE SU6RT. 

iGET THE POINTER TO THE- NEXT LOCATION IN QUfi.iE 
iSAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
I INCREMENT THE POINTER TO GTVE AN EvEN ADDRESS 
iCLEAR THE. UNWANTED BITS FROM THE BMP CODE. 
iSAVE THE BflP CODE ON THE QUEUE. 
iCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
iGO SAVE THf POINTER If WE, WU L NOT OVERROW. 
iRESET THE POINTFR TO THE. LAST LOCATION IN QLt 
(SAVE THf, POINTER. 



PASS 



RTS 



PC 



JSR 



TORt GPRS 



I Re 

PC.q»(SP)» 



(RETURN TO PREG05 SUBRT, 



CL-^ 



GLOBAl SiflROUTINt 

SS4 5 
f^M4 
3b4S 
^S4^ 
^^>4 ■■ 
S^48 

^s^o 

5558 

5560 
5561 
556a 

5565 
5564 

5565 
5566 
5567 
5568 
556 <i 
5570 
5571 
55 72 
55 73 
5574 
5575 
5576 
5577 
5576 
55 79 
5580 
55H1 

556a 



024626 
024626 
024652 
024656 



024646 
024652 
024654 
024660 
024662 
024664 
024670 
0246/2 
024676 

024 /OO 
0^4 700 
0^4702 



00456 7 
012704 
004 767 



012705 
005501 
016704 
010124 
010524 
020467 
105774 
052701 
001565 



004 ; 56 
000207 



MACF^O M1,?00 15 MAR 
SKPSTS 



84 09:48 PAUl 100 



SEQ 



» » 

* 

* 
* 

* 

* 



TTL GLOBAL SUBROUTINE 



SKPSTS 



- SKIP SELF TEST ROUTINE 
THIS SUBftOUTINh IS USED TO SKIP THE SELKTEST AMEN A DUT HE'.EI HAS Ht-EN 
INITIATED. IT HUST BE ENTERED IMMEDIATELY AFTER SETTING IHE OUT MAMER 
RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMINT, 
CONSIDERATIONS). 



INPUTS: 



CSRA CONTAINS ADDRESS 0^ THE DUT CSR. 

TXBFCA - CONTAINS ADORFSS OF OUT DMA BUFFER COUNT HECISTER. 



OUTPUTS: SKIF SELFTtST CODES ARE WRITTEN TO THE DUT REGISTERS. 

CALLING SEQUENCE: JSR PC, SKPSTS 

COMMENTS; 



SUBORDINATE ROUTINES CALLED: DELAt . 



1604 72 
OOOOi? 
172614 



skpst: 



t 



SAVE J SAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 iCAlL REGISTER SAVE SUBRT 

MOV •10..R4 iPASS OELAt VALUE OF 10 Mlil I SECONDS . 

JSR PC, DELAY (DELAY FOR 10 MILL I - SECONDS . 



I WRITE SKIP SELF -TEST CODE (52525) TO ALL THE! INDEXED DUT REGISTERS 



024642 012701 000060 



I - 



052525 
155520 

155526 
000017 



MOV tNUMLNS'BITOS.Rl iFORM INO.ADR.REG FIELD (PLUS M.R. BIT) WORD, 

I THE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
I LACK OF A M.H. BIT WRITE LOCK-OUT ON THE OHU 11. 

iINITIALlSE fne SKIP SELF TEST CODE, 

(SELECT THE NEXT SET OF DEVICE REGISTERS. 

iGET THE ADDRESS OF THE CSR OF THE DUT. 

(SELECT A BAr#< OF DUT REGISTERS. 

iWRITE THE CODE TO A DUT REGISTER. 

(COMPARE POINTER WITH I AST REGISTER ADDRESS. 

iLOOP IF NOT ALL REGS DONE IN THIS BAW . 

(TEST FOR INO.ADR.REG FIELD DECREMENTED TU 0. 

(LOOP L*JTII All REGISTERS CONTAIN THE CODE. 





MOV 


♦52525. R5 


41: 


DEC 


Rl 




MOV 


CSRA.R4 




MOV 


RI.CR4). 


6*s 


MOV 


R5.(R4)» 




CMP 


R4. TXBFCA 




BLO 


6t 




BIT 


♦17. Rl 




BNE 


4$ 


601; 


PASS 
RTS 


J 

PC 



(RESTORE GPRS, 
PC.QtSP)* 



iRETURN TO PREG05 SLiGRT 



Dl.^ 



e^BAti ^uMyfioifiNE'^"'" ^'^^^^ "^-^o§PLiap"^^-»^ ^^''^^ p'^c^ ^^^ 



sf.a 146 



5594 

5595 

5596 

559' 

559P 

5599 

5600 

5601 

560^ 

5605 

5604 

5605 

5606 

560? 

5608 

560« 

5610 

5611 

5612 

5613 

5614 

5615 

5616 

5617 

5618 

561-^ 

56.?0 

5621 

5622 

5625 

5624 

5625 

5626 

5627 

5628 

5629 

5630 

5651 

5632 

5653 

5654 

5635 
5656 
5^>5 7 
56 38 
5639 



.SBTTL GLOBAL SUBROUTINE - SPLSUP - 

- SPLIT SPEED TRANSMISSION/RECEPTION SET-UP ■ 

THIS ROUTINE IS USED TO INITIALISE BOTH THE OUT ANO THt 
TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
STATE. PRIOR TO SPLIT SPEED TRANSMISSION/RECEPTION. 



INPUTS! 



OUTPUTS: 



RO - TX.RX LPR CONTENTS FOR LINES IN GROUP II. 

Rl - TX,RX LPR CONTENTS FOR LINES IN GROUP I. 

R2 - START ADDRESS OF DATA PATTERN TO TRANSMIT. 

R3 - NCWBER OF TIME DATA PATTERN TO BE TX ON LINES IN LINGRPl 

R4 NUMBER OF TIME DATA PATTERN TO BE TX ON LINES IN I INGRP2 

ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 

LGRPIM - CONTAINS THE BIT MAP OF LINE GROUP I LINtS, 

LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODE SELECTED. 

CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 

THE CONTENTS OF THE CONTROL BLOCK ARE DESTROYED, 

THE INDIRECT ADDRESS FIELD OF THE OUT CSR MAY BE DESTROYED. 

THE OUT'S LPR'S AND LNC S MAY BE MODIFIED. 

THE FOLLOWING POINTERS AND COUNTERS ARE INITIALlSEOi 

CHCNT,CHRT0T,DPENO,DPLEN,EXCNT,RXCNT,RXD0NF,RXPTR,TXCNT. 

TXDONF.TXPTR.TXRXL. 



CALLING SEQUENCE: 



JSR 



PC, SPLSUP 



COMMENTS: 



THIS ROUTINE SHOULD BE CALLED TWICE 
THE SPLIT SPEED CAPABILITIES OF THE 
SO THAT BOTH LINE GROUPS ARE TESTED 
RECEPTION. 

EG, Rl - LPR CONTENTS 

LPR CONTENTS 
REPEAT TX ON 
REPEAT TX 
JSR PC. SPLSUP 
EXECUTE TEST FOR THE 
SWAP THE CONTENTS OF 
SWAP THE CONTENTS OF 

LPR CONTENTS 
LPR CONTENTS 
REPEAT TX ON 
REPEAT TX ON 



THE TESTING OF 



DURING 

OUT. 

ON TRANSMISSION AND 



Rl 
R? 
R3 
R4 



JSR 



THE 
Rl 
R2 
R5 
R4 
PC 



FOR LINES IN 
FOR LINES IN 
LINES IN LINE 
LINES IN LINE 
DO SET-UP. 

ABOVE SET-UP. 

Rl ANO R2. 
AND R4. 
FOR LINES IN 
FOR LINES IN 
LINES IN LINE 
LINES IN LINE 



LGRP2M.TX•Y.RX•^ 
LGRPIM, TX-Z.RX-r 



BAUD. 
BALID. 



ON 
I 



R3 



GROt-fP 
GROUP 



TIMES. 
TIMES. 



LGRP2M.TX-.r.RX-i BAUD. 
LGRPIM, TX-Y.RX-^ BAUD. 

- U TIMES. 

- X TIMES. 



GROUP 
GROUP 



EXECUTE 



.SPLSUP 
TEST AGAIN. 



iDO SET UP AGAIN. 



SUBORDINATE ROUTINES CALLED: CONMAP.RXDSBL .RXE?^L , TXRINI . 



024 704 

024 704 004567 

024 710 01006 7 



024714 
024 720 
024724 



010167 
005067 
005067 



160414 
000264 
000262 
155556 
155554 



SPLSUP i! SAVE 

MOV R0,/0* 

MOV Rl,;2$ 

CLR TXDONf 

CI R RXOONF 



iSAVE CONTENTS OF THE GPR' S RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SliBRT 

I SAVE LPR PARAMETER FOR LINE GRP2. 
J SAVE LPR PARAMETER FOR LINE GRPl. 
jCLEAR THE TX DONE TLAGS FOR ALL LINES. 
(CLfAH THE RX DONE FLAGS H)R ALL LINL^. 



.LT UP THE TRANSMISSlUN/REr.tPTlON CONTROL bLOCK TU INITIALISE THE LlNL; 



DHU-l). TUNC TST PART4 
GLOBAL iiUBROUTlNE 



£12 



MACRO m^o^ 
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;PLSUP - 



PAGE 101-1 



*"^EQ 147 



5M0 
5641 
5642 
5643 
5644 

5645 

5646 

5647 

5648 

5649 

5650 

5651 

5652 

5653 

5654 

5655 

5656 

5657 

5658 

5659 

5660 

5661 

5662 

5663 

5664 

5665 

5666 

5667 

5666 

5669 

5670 

5671 

5672 

5673 

5674 

5675 

5676 

5677 

5678 

56 79 

5680 

5681 

5682 

5683 

5684 

5665 

5686 

5687 

5688 

5689 

5690 

5691 

5692 

5693 

5694 

5695 

5696 



; IN GROUP II. 



024750 
024734 
024740 
024 744 
024746 
024752 
024 754 
024760 
024764 
024770 
024772 



010067 
012700 
012720 
010220 
012720 
010420 
016710 
046720 
116720 
005200 
012710 



025002 
025006 
025010 
025014 
025016 
025022 
025024 
025030 
025034 
025040 
025042 



012700 
010120 
012720 
010220 
012720 
010320 
016710 
046720 
116720 
005200 
012710 



025052 
025056 
025062 
025064 
025066 
025070 
025074 
025100 
025104 
025112 



012701 
016'np 

005101 
00510" 
040102 
046702 
010267 
005067 
016767 
004767 



156166 
003124 
000004 

000020 

155212 
155252 
155204 

000002 



024776 004767 000702 



003122 

000004 

000020 

155142 
155204 
155134 

000002 



025046 004767 000632 



177777 
155110 



155144 
156054 
156026 
0000/2 
000566 



MOV 


RO.CBB 


MOV 


*CBBt2.R0 


MOV 


*4.(R0). 


MOV 


R2.(R0)* 


MOV 


#16. ,CR0)* 


MOV 


R4.(R0)* 


MOV 


ACTLNS.CRO) 


BIC 


LGRPIM.CRO) 


MOVO 


LOPBCK.CRO) 


TNC 


RO 


MOV 


02. (RO) 



;SET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 

(GET BASE ADDRESS OF CONTROL BLOCK. 

tLNCTRL PARAMETER, ENABLE RECEIVERS. 

(START ADDRESS OF DATA PATTERN. 

(DATA PATTERN LENGTH SET TO 16, 

(NUMBER OF DATA PATTNS TO TRANSMIT ON LINGRP2, 

(BIT MAP OF LINES TO INITIALISE. 

(CLEAR THE UNWANTED LINES FROM BIT MAP. 

(SET LOOPBACK MODE. 

(INCREMENT ADDRESS TO ACCESS NEXT WORD. 

(SET OrrSET FOR EACH TRANSMISSION START TO 2. 



I INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS. 
! DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 
; - 



TO THE STATE 



JSR 



PC.TXRINI 



(INITIALISE DUT. 



SET UP CONTROL BLOCK FOR LINES IN GROUP I. 



I • 



MOV OCBB.RO 

MOV R1,(R0>* 

MOV 04 , ( RO ) ♦ 

MOV R2,(R0)» 

MOV #16. ,CR0)» 

MOV R5,(R0)* 

MOV ACTLNS.CRO) 

BIC LGRP2M.(R0)» 

MOVB LOPBCK.CRO)* 

INC RO 

MOV #2.(R0) 



(GET START ADDRESS OF CONTROL BLOCK. 

(SET LPR PARAMETER FOR LINES TO RECEIVE DATA. 

(LNCTRL PARAMETER, ENABLE RECEIVERS. 

(START ADDRESS OT DATA PATTERN. 

(DATA PATTERN LENGTH SET TO 16. 

(NUMBER OF DATA PATTNS TO TRANSMIT ON LINGRPl 

(BIT MAP or LINES TO INITIALISE. 

(CLEAR THE UNWANTED LINES FROM BIT MAP. 

(SET LOOPBACK MODE. 

(INCREMENT ADDRESS TO ACCESS NEXT WORD. 

(SET OFFSET FOR EACH TRANSMISSION START TO 2. 



( INITIALISE THE OUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
( DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 



JSR 



PC.TXRINI 



(INITIALISE DUT. 



( SET-UP THE REQUIRED LPR PARAMETERS NEEDED FOR THE CORRECT RECEPTION OF DATA 
( ON ASSOCIATED IN-ACTIVE LINES. 
J - 

( INITIALISE LPR PARAMETERS FOR LINE GROUP 1. 

LINES. 



156010 



MOV 


dMAPl NS.Rl 


MOV 


ACTLNS,R2 


COM 


Rl 


COM 


R2 


BIC 


R1,R2 


BIC 


LGRP2M,R2 


MOV 


R2.CBMAPA 


CLR 


CBDPNA 


MOV 


72$. CBLPHA 


JSR 


PC.TXRINI 


; INITIALISE 


LPR PARAMETERS 



CORRESPOND IN(» TO ALL 

(TX) LINE BII MAP. 

MAP OF NONE EXISTANT LINES 



(SET UP BIT MAP 
(GET THE ACTIVE 
(GENERATE A BIT 
(GENERATE A BIT MAP Of INACTIVE LINES. 
(CLEAR ANY "NONE EXISTANT'* INACTIVE LiNtS 
(ONLY PASS LGRPl ASSOCIATED LINE BIT M^\P . 
(SET UP BIT MAP IN CONTROL BLOCK. 
(CLEAR REPEAT TX COLiNT IN CONTROL BLOCK. 
(SET UP COMPLEMENTARY LPR PAHM FOR L URP2 , 
(INITIALISE INACTIVE LINES IN LGRP2. 



FOR LINE 



GROUP "" 



<- » 



DHU-ll FUNC TST PART4 
GLOBAL SUBROUTINE 



5697 
5696 
5699 
5700 
5701 
5702 
5703 
5704 
5705 
5706 
5707 
5708 
5709 
5710 
5711 
5712 
5713 
5714 
5715 
5716 
5717 
5718 
5719 

5720 
5721 
5722 



025116 
025122 
025124 
025126 
025132 
025136 
025144 



025150 
025154 



025160 
025164 
025170 

025174 
025174 
025176 
025200 
025202 



016 702 
005102 
040102 
046702 
010267 
016767 
004767 



012705 
004767 



016705 
004767 
004767 



004736 
000207 
000000 
000000 



F12 
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- SPLSUP - 




155050 


MOV 


ACTLNS.R2 




COM 


R2 




BIG 


R1.R2 


155104 


BIG 


LGRP1M.R2 


155776 


MOV 


R2,GBMAPA 


000036 


155756 MOV 


70$,CBLPRA 


000534 


JSR 


PC.TXRINI 



^EQ 148 



177777 
177124 



155006 
172212 
177204 



(GET THE ACTIVE (TX) LINE BIT MAP. 
iGENERATE A BIT MAP OF INACTIVE LINES. 
(CLEAR ANY NONE EXISTANT INACTIVE LINES. 
(ONLY PASS LGRP2 ASSOCIATED LINE BIT MAP. 
i SET -UP BIT MAP IN CONTROL BLOCK, 
t SET -UP COMPLAMENTARY LPR PARAM FOR LGRPl 
I INITIALISE INACTIVE LINES IN LGRPl. 



DISABLE RECEIVERS ON ALL LINES TO ENSURE THAT ONLY THE RECEIVERS OF 
ASSOCIATED ACTIVE CTX) LINES ARE ENABLED. C STAGGAREO LOOPBAdO 
RE-ENABLE RECEPTION ON THE CORRECT ASSOCIATED LINES. 



THE 



MOV «MAPLNS.R5 
JSR PC.RXDSBL 



(SET-'JP BIT MAP FOR ALL LINES. 
(DISABLE RX ON ALL LINES. 



ENABLE RECEIVERS ON ASSOCIATED CRX) LINES. 



60$: 



70$: 
72$: 



MOV 
JSR 
JSR 

PASS 

RTS 

.WORD 
.WORD 



ACTLNS.R5 
PCCONMAP 
PC.RXENBL 



(GET ACTIVE (TX) LINE BIT MAP. 

iGENERATE AN ASSOCIATED (RX) LINE BIT MAP 

(ENABLE RECEIVERS ON ASSOCIATED LINES. 



PC 







JSR 



(RESTORE GRP'S. 
PC.aCSPV 



[RETURN TO PREG05 SUBRT 



(LOCAL 
jLOCAL 



STORAGE 
STORAGE 



OF 
OF 



LPR 
LPR 



PARAMETER 
PARAMETER 



LGRP2. 
LGRPl. 



DHU-U TUNC TST PART4 
GLOBAL SUBROUTINE 

57?5 

57^7 
57^8 
5729 
5750 
57?l 
5732 
5735 
5734 
5735 
5736 
5737 

5738 
5739 
5740 

5741 025204 
025204 004567 

5742 025210 010146 

5743 025212 0127^16 

5744 025216 000002 

5745 025220 
025220 004736 

5746 025222 000207 
5747 

5748 
5749 
5750 



HACRO M1200 
STPSW 



160U4 
025220 



G12 
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.SBTTL GLOBAL GUBROUTINE - STPSW - 



;♦ 

i* 
J* 

!* 
!* 

J* 

;♦ 
J* 
i* 
i* 



- SET PROCESSOR STATUS WORD - 
THIS ROUTINE SETS THE PSW TO THE CONTENTS OF Rl. 

INPUTS: Rl - CONTAINS THE NEW PSW SETTINGS 

OUTPUTS: PSW - SET TO THE CONTENTS OF Rl 

CALLING SEQUENCE: JSR PC. STPSW 

COMMENTS: USED IN THE DMA ADDRESS TEST TO SET THE PROCESSOR 

PRIORITY WITHOUT MAKING A CALL TO THE DRS . 



SUBROUTINES CALLED: 



NONE. 



STPSW: : SAVE 



ADOR: 



MOV 
MOV 

RTI 

PASS 

RTS 



JSR 
PI, -(SP) 
OADDR, -CSP) 



R5.PREG05 iCALL REGISTER SAVE SUBRT. 
;PUSH THE NEW PSW CONTENTS ONTO THE STACK 
I PUSH THE NEW PC VALUE ONTO THE STACK 
I LOAD THE NEW PC AND PSW 



SEO) 149 



JSR 



PC 



PC.SCSP)* 
; RE TURN 



i RETURN TO PREG05 SUBRT 



mskt 



sHbRou 



i^Ni 



H12 



'ARTA MA 



ms\i 
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^EQ 150 



5752 
575? 
5754 
5755 
5 756 
5757 
5758 
5759 
5760 
5761 
576? 
5765 
5764 
5765 
5 .••66 
5767 
5768 
5769 
5770 
5771 
5772 
5773 

5774 
5775 
5776 
5777 
5778 
5779 
5780 
5781 
5782 
5783 
5784 
5785 
5/86 
5787 
5788 
5789 
5790 
5791 
5792 
5793 
5794 
5795 
5796 
5797 
5 798 
5799 
5800 
5801 
5802 
5803 
5804 
5805 
5806 
5807 



025224 
025224 



025230 
025254 
025240 
025242 
025244 



025246 
025250 
025254 
025256 
025260 
025262 
025264 
025266 
025270 
025274 
025500 
025304 



016703 
016702 
040203 
005703 
001427 



005004 
012702 
030203 
001003 
006102 
005204 
000773 
006504 
016401 
016702 
004 76 7 
006301 



.SBTTL GLOBAL SUBROUTINE - TXDONt - 

* - TRANSMISSION DONE - 

♦ THIS SUBROUTINE IS USED IN THE TRANSMISSION/RECEP riON TESTS TO ALLOW 

• TIME FOR TRANSMISSION TO COMPLETE ON OUTSTANDING LINES. 

* 

* INPUTS: ACTLNS - CONTAINS BIT MAP Of ALL ACTIVE LINES. 

* TXOONF - TX DONE FLAGS » SET FOR LINES THAT HAVE SENT ALL CHARS. 

♦ CHCNT - TABLE CONTANING THE NUMBER OF CHARS TO BE TX'D. 



TRANSMISSION INTERRUPTS ARE DISABLED. 
JSR PC.TXDONE 



♦ OUTPUTS: 

* CALLING SEQUENCE: 

♦ COMMENTS: 

* SUBORDINATE ROUTINES CALLED: MSL00P.MUL16U. 



004567 160074 



TXDONE: j SAVE 



iSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT 



154736 
155242 



MOV 


ACTLNS, R3 


MOV 


TXOONF, R2 


BIC 


R2,R3 


TST 


R3 


BEQ 


6$ 



000001 



003442 
154746 
L74134 



CHECK IF ALL ACTIVE LINES HAVE COMPLETED TRANSMISSION, 
ir ANY HAVE NOT YET COMPLETED. DETERMINE THE TX CHAR COUNT FOR A 
LINE THAT HAS OUTSTANDING CHARACTERS TO TRANSMIT. USING THIS VALUE. 
CALCULATE THE TIME-OUT VALUE NEEDED AT THE CURRENTLY SELECTED BAUD RATE. 

iGET THE ACTIVE LINE BIT MAP. 

;GET THE BIT MAP OF LINES THAT HAVE COMPLETED. 

iGENERATE A BIT MAP OF LINES THAT ARE STILL TX. 

iCHECK IF ALL LINES HAVE COMPLETED TX. 

iGO DISABLE TX INTERRUPTS IF ALL DONE. 

FIND A LINE THAT HAS NOT COMPLETED TRANSMISSION. 

OBTAIN THE EXPECTED CHARACTER COUNT FOR THAT LINE (WHICH IS THE SAME FOR 

ALL OTHER LINES WITH OUTSTANDING TX'S). 

CALCULATE TIME-OUT VALUE. 

; CLEAR LINE NUMBER COUNTER. 

jSELECT BIT MAP FOR THE FIRST LINE. 
2$: BIT R2.R3 j SEE IF THIS LINE HAS COMPLETED. 

(BRANCH IF THIS LINE HAS NOT COMPLETED TX. 

(SHIFT THE LINE BIT MAP FOR THE NEXT LINE. 

(INCREMENT THE LINE NUMBER COUNTER. 

(LOOP TO CHECK THE NEXT LINE. 
4$: ASL R4 jLlNE NUMBER X 2 TO OBTAIN OFFSET INTO TABl.e: . 

(GET THE EXPECltD NUMBER OF CHARS TO BE TXD. 

(GET THE CURRENT TIME-OUT VALLt FOR ONE CHAR. 

((NUMBER or CHARS TO TX) X (TIME-OUT Or 1 CHAR ^ 

(MULTIPLY DELAY TIME BY 2 TO GIVE A SAFE VALUE. 

I WAIT FOR ALL OUSTANDING TRANSMISSIONS TO COMPLETE OR TIME-OUT. 
) DISABLE ALL TRANSMISSION INTERRUPTS. 



CLR 


R4 


MOV 


«1.R2 


BIT 


R2.R3 


BNE 


4$ 


ROL 


R2 


INC 


H4 


BR 


25 


ASL 


R4 


MOV 


CHCNTB(R4),R1 


MOV 


RXT0UT,R2 


JSR 


PC,MUL16U 


ASL 


Rl 



025506 016702 154660 



MOV 



ACVLNS.R2 



(PASS A BIT MAP OF THE BITS TO TEST, 
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SEQ 151 



5808 


025512 


010203 




5809 


025314 


012704 


002502 


5810 


025320 


004767 


173664 


5811 


025324 


004 767 


000270 


581^ 








5815 


025550 








025550 


004756 




5814 


025332 


000207 





6S: 
60$: 



MOV 
MOV 

JSR 

JSR 

PASS 
RTS 



R2.R3 
*TXD0NF.R4 
PC.MSLOOP 
PC.TXIEO 



PC 



JSR 



iPASS THE EXPECTED STATE OF THE TXOONF. 
iPASS THE ADDRESS OF THE WORD TO TEST. 
(WAIT FOR TIME-OUT OF TX COMPLETION. 
jDISABLE ALL TX INTERRUPTS. 



jRESTORE GPRS. 
PC.aCSP)* 



(RETURN TO PREG05 SUBRT 



J12 
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5816 
5817 
5818 
5819 
5820 
5821 
5822 
5823 
5824 
5825 
5826 
5627 
5828 
5829 
5850 
5831 
5832 
5833 
5834 
5835 
5836 
5837 
5838 
5839 
5640 



5841 
5842 
5843 
5844 
5645 
5846 
5847 
5648 
5849 
5850 
5851 
5852 
5853 
5854 
5855 
5856 
5857 
5858 
5859 
5860 
5861 
5862 
5863 
5864 
5865 
5866 
5867 



5868 
5869 



025334 
025334 
025340 
025342 
025346 
025352 
025354 
025360 
025364 



025366 
025372 
025374 
02557b 



025400 
025402 
025404 
025410 
025412 
0254 14 
025416 

025420 
025420 
025424 



004567 
010500 
012701 
016702 
005202 
012703 
016704 
005005 



010477 
105713 
100001 
050105 



030100 
00140? 
14271;' 
005204 
006301 
005303 
001363 



010566 
004736 
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157764 

000001 
154642 

000020 
154650 



154606 



000200 



000014 



.SB 

! *♦ 

!♦ 

;* 

I* 

I* 

I* 

;♦ 

!* 

{♦ 

;* 
i* 

!* 

i* 
i + 

;* 
i* 
;♦ 

• * 

i* 
;* 



TTL GLOBAL SUBROUTINE - TXDSBL - 

- TRANSMITTER DISABLE - 
THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES BY, 
CLEARING THE ASSOCIATED TX. ENABLE BIT ON THE OUT. 



INPUTS : 



OUTPUTS: 



R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR TX. ENABLE. 
CSRA - COmAINS THE ADDRESS OF THE DUT CSR . 

lEbAT - CONTAINS THE STATE Of TXIE AND RXIE BITS IN THE CSR. 
NUMLIJS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 

R5 - BIT'S SET INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS 

TBUFFA02 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 

THE CONTENTS OF THE IND.AOD.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, TXDSBL 



SLiBOROINATE ROUTINES CALLED: NONE. 



TXDSBL:: SAVE 



2J: 





JSR 


MOV 


R5.R0 


MOV 


#flITC,Rl 


MOV 


TXAD2A,R2 


INC 


R2 


MOV 


*NUMLNS.R3 


MOV 


IESTAT.R4 


CLR 


R5 


EVERY 


LINE IN TURN 


MOV 


R4.aCSRA 


TSTB 


(R2) 


BPL 


4$ 


BIS 


R1,R5 



; ♦ 


CLEAR TX. 


ENBLE ON LINES 




LINE BIT 


MAP. 


4$; 


BIT 


R1,R0 




BEQ 


6$ 




BICE 


flBlT7,(R2) 


6$: 


INC 


R4 




ASL 


Rl 




DEC 


R3 




BNE 


2$ 


60$ 


: PASS 


R5 

MOV 
JSR 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 J CALL REGISTER SAVE SUBRT. 
;COPY BIT MAP OF LINES TO DISABLE TRANSMISSION 
INITIALIZE THE SELECTED LINE BIT MASK. 
;GET THE ADDRESS OF THE TBUFFA02 REGISTER. 
iGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG 
(GET MAXIMUM LINE NUMBER PLUS ONE. 
iGET THE STATES OF THE INT ENABLE BITS. 
iLOG POSSIBLE TX DISABLED ON ALL LINES. 



iWRITF. TO DUT CSR TO SELECT LINE REGISTERS, 
CHECK STATE OF TX. ENABLE BIT ON SELECTED LINE 
SKIP NEXT INSTRUCTION IF TX. ENABLE CLEAR. 
LOG TX ENABLE BIT SET FOR SELECTED LINE. 



J CHECK STATE OF DISABLE LINE BIT MAP. 
iBRANCH IF THIS LINE TO REMAIN UNALTERED. 
(CLEAR TX. ENABLE BIT ON SELECTED LINE, 
(PREPARE TO SELECT REGISTERS FOR NEXT LINE. 
I SHIFT BIT MAP FOR NEXT LINE. 
[DECREMENT LINE NUMBER. 
iLOOP TO CHECK NEXT LINE. 



025426 000207 



RTS 



PC 



;RESTORE CiPRS, EXCEPT 

R5,R5SL0TCSP) 

PC»S(SP)* 

iR5 - PREVIOUS STATES 



;PUT R5 IN STACK SLOT. 
(RETURN TO PREG05 SUBRT 
OF ALL TX. ENABLE BITS. 



I<i2 
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15871 

5873 
5874 
5875 
5876 
5877 
5878 
5879 
5880 
5881 
5882 
5883 
5884 
5885 
5886 
5887 
5888 
5889 
5890 
5891 
5892 
5893 
5894 



5895 
5896 
5897 
5898 
5899 
5900 
5901 
5902 
5903 
5904 
5905 
5906 
5907 
5908 
5909 
5910 
5911 
5912 
5913 
5914 
5915 
5916 
5917 
5918 
5919 
5920 
5921 



5922 
5925 
5924 



025430 

025430 00456 7 

025434 010500 

025436 012701 

025442 016702 

025446 005202 

025450 012703 

025454 016704 

025460 005005 



025462 010477 

025466 105712 

025470 100401 

025472 050105 
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.SBTTL GLOBAL SUBROUTINE - TXENBL - 



- TRANSMITTER ENABLE - 
THIS SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES BY 
SETTING THE ASSOCIATED TX. ENABLE BIT ON THE OUT. 



INPUTS: 



OUTPUTS: 



R5 - BIT'S SET CORRESPOND TO LINES ON UHICH TO SET TX. ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE OUT CSR. 

lESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 

R5 - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 

TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 

THE CONTENTS OF THE IND.AOD.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, TXENBL 



;♦ SUBORDINATE ROUTINES CALLED: NONE. 



157670 

000001 
154546 

000020 
154554 



154512 



TXENBL: : SAVE 



2$: 





JSR 


MOV 


R5,R0 


MOV 


OBITO.Rl 


MOV 


TXAD2A.R2 


INC 


R2 


MOV 


0NUMLNS,R3 


MOV 


IE3TAT,R4 


CLR 


R5 


EVERY 


LINE IN TURN 


MOV 


R4.8CSRA 


TSTB 


(R2) 


BMI 


4$ 


BIS 


R1,R5 



iSAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SUBRT. 

I COPY BIT MAP OF LINES TO ENABLE. 

1 INITIALIZE THE SELECTED LINE BIT MASK. 

iGET THE ADDRESS OF THE TBUFFA02 REGISTER. 

(GET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG 

;GET MAXIMUM LINE Nl^MBER. 

iGET THE STATES OF THE TNT ENABLE BITS. 

1 CLEAR TX. ENABLE BIT LOG OF DISABLED LINES. 



;URITE TO OUT CSR TO SELECT LINE REGISTERS. 
;CHECK STATE OF TX. ENABLE BIT ON SELECTED LINE. 
(SKIP NEXT INSTRUCTION IF TX.EJJABLE SET. 
:LOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 



025474 030100 

025476 001402 

025500 152712 000200 

025504 005204 

025506 006501 

025510 005503 

025512 001363 

025514 

025514 010566 000014 

025520 004736 



025522 000207 



SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 
LINE BIT MAP. 



4$: 
6$; 

60$; 



BIT 
BEQ 
BISB 

INC 
ASL 
DEC 
BNE 

PASS 



RTS 



Rl.RO 

6$ 

ftBIT7.(R2) 

R4 

Rl 

R3 

2$ 



R5 



PC 



MOV 
JSR 



[CHECK STATE OF TX. ENABLE LINE BIT MAP. 

(BRANCH IF THIS LINE TO REMAIN UNALTERED. 

(ENABLE TRANSMISSION ON SELECTED LINE. 

i PREPARE TO SELECT REGISTERS FOR NEXT LINE. 

[SHIFT BIT MAP FOR NEXT LINE. 

(DECREMENT LINE NUMBER. 

(LOOP TO CHECK NEXT LINE. 

(RESTORE GPRS. EXCEPT 

R5,R5SL0T(SP) ;PUT R5 IN STACK bLd . 

PC,aCSP)» (RETURN TO PREG05 SUBRT. 

iR5 - LiNt BIT MAP CORRESPONDING TO THE 

( PREVIOUS LINES THAT WERE DISABLED. 
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Llc^ 



SEQ 154 



59?6 
5927 
59f?8 
59^9 
5960 
5931 
59J2 
5933 
5934 
5935 
5936 
5937 
5958 
5939 
5940 
5941 
5942 
5943 
5944 
5945 
5946 
5947 
5948 
5949 
5950 
5951 
5952 
5953 
5954 
5955 
5956 
5957 

5959 
5959 
5960 

5961 
5962 
5963 
5964 
5965 
5966 
5967 
5968 
5969 
5970 
5971 
59/;? 
5973 
5974 
5975 
59/6 
597 V 
5978 
5979 
5980 
5981 



SBTTL GLOBAL SUBROUTINE - TXFRPR - 

* - TRANSMIT FRAMMING ERROR DATA ROUTINE - 

* THIS ROUTINE IT, USED TO INITIATE DMA MODt TRANSMISSION 

* IN THE FRAMMING ERROR TEST. IT SENDS A SINGLE CHARACTER DMA BUFFER ON 
» EACH ACTIVE LINE IN THE BIT MAP. TO CAUSE FUTURE TX INTERRUPTS WHICH 

* WILL CONTINUE THE TRANSMISSION IF MORE THAN ONE BUFFER IS TO BE SENT. 
*. 

R4 - CONTAINS THE LINES ON WHICH TX IS TO TAKE PLACE, 
ACTLNS - ACTIVE LINES BIT MAP. 

- LABEL OF TABLE OF WORDS EACH WITH A BIT SET, 
CONTAINS THE ADDRESS OF THE OUT CSR . 

- BASE OF THE DATA PATTERN END TABLE (ENTRY PER LINE). 

- BASE OF THE DATA PATTERN LENGTH TABLE. 

- PRESERVED STATES OF THE OUT INTERRUPT ENABLE BITS. 

- EQUATED TO NUMBER OF LINES ON A DUT. 

- LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE. 

- LABEL AT BASE OF THE TX DATA PATTERN POINTERS TABLE. 



♦ INPUTS; 

♦ 
* 

* 



BITTBL 
CSRA - 
DP6NDB 
DPLEN6 
lESTAT 
NUMLNS 
TXCNTB 
TXPTRB 



025524 
025524 
025530 
025534 
025536 



4i 

I* 
i* 
t* 

i* 
J* 

:* 
;♦ 

!* 
I* 

i* 

; * 
( 



OUTPUTS I 



DESTROYED. 



CSR - DUT CSR IND.AOR.REG FIELD IS 

TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS SENT. 

TXINTF - TX INT FLAGS CBIT SET IF DMA. HO FOUND SET ON LINE). 



CALLING SEQUENCE: 



JSR 



PC.TXFRPR 



COMMENTS; THIS ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTERN SHOULD BE 
TRANSMITTED ON EACH ACTIVE LINE. 
INTERRUPTS MUST BE DISABLliD WHEN CALLING THIS ROUTINE. 

SUBORDINATE ROUTINES CALLED: DOOMA. 



004567 
016705 
005104 
040405 



157574 
154436 



TXFRPR:: SAVE 

MOV 
COM 
BIC 



JSR 
ACTLNS. R5 
R4 
R4.R5 



R5. 
SAVE 



SUBRT 



iSAVE CONTENTS OF GPRS RO THRU 

R5.PREG05 ;CALL REGISTER 

jGET THE ACTIVE LINE BIT MAP. 

iGET BIT MAP OF LINES THAT WILL RECEIVE DATA. 

: CLEAR LINES THAT WILL RX FROM TX LINE BIT MAP. 



025540 005001 



SET UP LOOP WHICH HANDLES ONE LINE PER ITERATION. 



CLR 



Rl 



i CLEAR THE LINE NUMBER COUNTER. 



025542 
025544 
025546 



000241 
006005 
103017 



2$: 



IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE. 



CLC 
ROR 
BCC 



R5 
6$ 



i CLEAR BOOLEAN REGISTER. 

t SHIFT BIT MAP OF LINES TO TX ON INTO BOOL. REG. 

iDON'T TX ON THIS LINE IF IT IS NOT ACTIVE. 



025550 
025552 
025554 
025560 



010104 
006304 

016403 005202 
016402 003342 



LINE IS ACTIVE'. 

INITIATE DMA ON THIS LINE. 

GET THE DATA PATTERN LENGTH FOR THIS LINE. 



MOV 


R1.R4 


ASL 


R4 


MOV 


DPLENBCR4).R5 


MOV 


TXPTRB(R4),R2 



;CnPY LINE NUMBER. 

(CALCULATE WORD OFFSET FOR THIS LINE. 

iGtT DATA PATTERN LENGTH FOR THIS LINE. 

J PREPARE TO PASS DATA PATTERN ADR TO DOOMA 



RTN 



WRITE DMA PARAMETERS TO THE DUT. 



Mi2 
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5983 
5984 
5965 
5986 
5987 
5988 
5989 
5990 
5991 
5992 
5993 
5994 
5995 
5996 
5997 
5998 
5999 
6000 
6001 

6oo^ 



025564 
025570 



025572 
025600 



004 76 7 
103404 



056467 
000402 



172122 



025602 060364 003502 



025606 
025610 
025612 

025614 
025614 
025616 



005201 
005705 
001353 



004736 
000207 
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002364 154464 



I - 



I ♦ 



JSH 

BCS 



PCOODMA 
4$ 



iSiaP ERROR IF OODMA WAS SUCCESSFUL. 



SET THE PROPER BIT OF THE TX INTERRUPT FLAGS TO INDICATE THE LINE ERROR. 

BIS BITTBL(R4),TXINTF ; INDICATE THE ERROR. 
BR 6$ {SKIP UPDATING POINTERS AND COUNTERS. 

UPDATE THE TX CHARACTER COUNT FOR THIS LINE. 

: ADD R3,TXCNTB(R4) [ADD THE DATA PATTERN LENGTH TO TX CHAR COUNT. 

INCREMENT LINE COUNTER. GOTO NEXT LINE IF NOT DONE. 

6$! 



4$ 



60$: 



INC 
TST 
BNE 

PASS 

RTS 



Rl 
R5 



PC 



INCREMENT THE LINE COUNTER. 

TEST THE TX LINE BIT MAP. 

LOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 



J5R 



iRESTORE GPRS. 
PC.aCSP)* 



{RETURN TO PREG05 SUBRT 



^EQ 155 
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^EQ 156 



6004 
6005 
6006 
6007 
6008 
6009 
6010 
60U 
60i;> 
601? 
6014 
6015 
6016 
60W 
6018 
6019 

eQ?o 

6021 
60.^2 
6025 



60a4 



6025 
6026 
60;? 7 



6028 
6029 



025620 
025622 
02'^^622 
025624 
025626 
025626 
025632 
025634 
025642 
025650 
025650 
025652 
025654 
025656 



010046 

104440 
010046 

012700 000340 
104441 

042767 177677 

016777 154366 

012600 
104441 
012600 
000207 



154372 
154330 



.SBTTl. GLOBAL SUBROUTINE - TXIEO ■ 

:* - TRANSMITTER INTERRUPT DISABLE - 

:* THIS ROUTINE IS USED TO DISA3LE TRANSMITTER INTERRUPTS IN THE DHUll. 

;♦ 

;* INPUTS: NONE. 

J* 

t* OUTPUTS; THE TX.INT.ENBL BIT IS CLEARED IN THE DUT CSR. 

i* lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

I* ENABLE BITS. 

i* 

i* CALLING SEQUENCE: JSR PC, TXIEO 

:* 

;♦ COMMENTS: THE CONTENTS OK THE INDIRECT ADDRESS REGISTER FIELD IN 

J* THE DUT CSR ARE DESTROYED. 

!* 

J* SUBORDINATE ROUTINES CALLED: NONE. 



TXIEO: : MOV 

GETPRl 



RO, "(SP) 
-CSP) 



SETPRI ^;PRIO" 



BIG #177677. lESTAT 
MOV IFSTAT.aCSRA 
SETPRI (SP)* 



MOV 
ITS 



(SP)*.RO 
PC 



J SAVE CONTENTS OF riO ON THE STACK. 

J SAVE CURi^ENT PROCESSOR PRIORITY ON FHt STACK. 

TRAP C$GPRI 
MOV RO. (SP) 

i IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 

MOV #PR107,R0 
TRAP CSSPRI 

jCLEAR TX.INT.ENBL BIT IN IE5TAT. 

[DISABLE TX INTERRUPTS. 

lENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV ( SP ) ♦ . RO 
TRAP C$SPR1 

•.RESTORE RO. 



Bl:^ 
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b05l 

tOS^ 
6054 
60 JS 
60?t> 
605' 

^05t^ 
^0^^ 
6040 
6041 
^04J 
604 5 
6044 
604 S 
6046 

604: 

604 H 
r>049 
6050 
6051 
605^ 
6053 
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^EQ IS'/ 



TXIEl 



TRANSMITTER INTERRUPT ENABLE 
THIS ROUTINE Ki USED TO ENABLE TRANSMITTtR INTERRUPTS IN THE OHUU. 

INPUTS: NONE. 

OUTPUTS: THE TX.INT.FNBL BIT IS SET IN THE OUT CSR. 

IEST5T CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
ENABLE BITS. 



CALLING SEQUENCE: 



JSR 



PC, TXIEl 



COMMENTS: 

SUBORDINATE ROUTINES CALIED: NONE, 



THE CONTENTS Of THE INDIRECT ADDRESS REGISTER FIELD IN 
THE OUT CSR ARE DESTROYED. 



0^5660 
0^5666 
0JS6.'4 



05276'' 
OA?7b7 
0167/; 
000i.*07 



040000 

1376;; 

154334 



154 546 
154 540 
15Ae76 



TXItlu 



BIS 


^IT14.U.STAT 


BIG 


oi5;6;;.itsTAT 


MOV 


IfSTAT.SCSRA 


RTb 


PC 



iSET Tx.INT.ENBl BIT IN lESTAT. 
iCUAR AU BITS EXCEPT TX RX I,E BITS. 
jENABLE TX INTERRUPTS. 



erafiAi' 



C1.5 



^MoiHu^ 
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'nha ItiQ 



^OSS 
^os^ 

^or.^ 

f>0t.5 
b064 
bObS 
60bb 

t.ot> r 

bOh8 
60 ■ 1 

bO:5 

60 74 

6076 
60- : 
60 7fl 

60r'9 

6080 
6081 
608r 
6085 
6084 

6oes 

60«6 
608^ 
6088 

608<* 
6090 
6091 
609? 
6095 
6094 
609S 
6096 
609/ 
6098 

60 ^'-i 
6100 
6101 
610.' 
6105 
6104 
610'. 
6106 
610 ' 

61 OH 
610'* 
6110 

61U 
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n Gl OBAl SUBROUTINE - TXRINI 

■ TRANSMIT AND RECEIVE INITIALIZATION ROUTINE 
THIS SUeROUTINE PERFORMS THE INITIALIZATtON OF THE VARIOUS POINTERS. 
COUNTERS, AND FLAGS WHICH ARE USED DURING THE TRANSMISSION AND 
RECEPTION PORTION OF A TEST. THIS INI 1 lAL IZATION IS PERFORMED ON 
THE SPECIFIED LINES ONLY. OTHER LINE VARIABLES REMAIN UNCHANGLD. 



INPUTS 1 



OUTPUTS; 



CHCNTB 

CHRTOT 

DPENDB 

DPLEN8 

EXCNTB 

IE5TAT 

NUMLNS 

RXCNTB 

RXPTRB 

TXCNTB 

TXPTRB 

C66 

CB CONTENTS 
CBLPRA 
CBLNCA 
C6DPAA 
CBDPLA 
CBOPNA 
CBMAPA 
CBLPBA 
CBOFSA 



LABEL AT BASE OF LINE CHARACTER COUNT TABlE. 
MAX OF CHARS TO RX ON LINES ALREADI INITIALIZED. 
LABEL AT BASE OF LINE DATA PATTERN END TABLE. 
LABEL AT BASE OF LINE DATA PATTERN LENGTH TABLE. 
LABEL AT BASE ADDRESS OF EXTRA CHAR COUNTERS TABLE. 
PRESENT STATE OF THE RX.IE AND TX.IE BITS. 
EQUATED TO NUMBER OF LINES ON THE DUT . 
LABEL AT BASE ADDRESS OF RX CHARACTER COUNTERS TABLE 
LABLE AT BASE ADR OF "NEXT RX CHAR" POINTERS TABLE. 
LABEL AT BASE ADDRESS OF TX CHARACTER COUNTERS TABLE 
LABEL AT BASE ADR OF "NEXT TX CHAR" POINTERS TABLE. 
LABEL AT BASE OF TX/RX CONTROL BLOCK, 

TX/RX CONTROL BLOCK CONTAINS THE FOLLOWINGj 

OUT LPR CONTENTS. 

DUT LNCTRL CONTENTS. 

ADDRESS OF BEGINNING OF DATA Prti FERN. 

LENGTH IN BYTES OF DATA PATTERN. 

NUr«ER OF DATA PATTERNS TO TRANSMIT. 

BIT MAP OF LINES TO BE INITIALIZED. 

TYPE OF LOOPBACK TO BE USED FOR TEST. 

AMOUNT TO OFFSET EACH TX START IN THE DATA PAT. 



TXRXLB • LABEL AT BASE OF TX/RX LINE ASSOCIATION TABLE. 



CMCNT - 
CHRTOT 
DPEND - 
DPLEN - 

DUT LNC 
DUT LPR 
EXCNT - 
RXCNT - 
RXOONF 
RXPTR - 
TXCNT - 
TXOON^' 
TXPTR - 
TXRXL - 



TABLE OF NUMBER OF LINE TX CHARACTERS (INITIALIZED). 
- MAXIMUM NUMBER OF CHARS TO RECEIVE (? * PAT LENGTH). 
TABLE OF DATA PATTERN ENDS (INITIALIZED). 
TABLE OF DATA PATTERN LENGTHS (INITIALIZED), 
TRL - LINE CONTROL REGISTERS (INITIALIZED). 
LINE PARAMETER REGISTERS (INITIALIZED). 
TABLE Of EXTRA RX CHAR COUNTS (CLRED, SELECTED LINtSi. 
TABLE OF RX CHARACTER COUNTS (CLRED, SELECTED LINES). 
"RECEPTION DONE" FLAGS (CLEARED FOR SELECTED L INES). 
TABLE OF RECEIVE POINTERS (INITIALIZED). 
TABLE OF TX CHARACTER COUNTERS (CLRED. SELECTED LINtS^ 
"TRANSMISSION DONE" FLAGS (CLRED FOR SELECTED LINES). 
TABLE OF TRANSMIT POINTERS (INITIALIZED). 
TX/RX t.INt ASSOCIATION TABLE (INITIALIZED). 



CALLING SEQUfcNCL 



JSR 



PC. TXRINI 



COMMENTS! U THt CALClXAtlON Of THE CHRTOT VALLI KJ T IHt s iHt OAT\ 

PATTERN LENGTH) RESULTS IN A NUMBER GREATER THAN 64K THEN 
CHRTOT IS INITIALIZED TO 64K 1. 

THIS ROUTINE WILL NOT FORCE INTERNAL LOOPBACK BASED ON ^h* 
LOOPBACK TYPE IN CBLPBA, THE. USER MUST SET L*» CBLNCA COHRlCt ^ 
TO GET INTERNAL L OOPBACK . 

•jU^ORDINATt ROUTINES CAILK): WTgi NC . W'Wl J-'R . 



Dl'6 



:> 



m^k' ^Momni^^'' 


MACRO ^ 


MU^ 


025/04 








025704 


004567 


157414 


blK? 








M14 








MIS 








bll6 


025710 


016705 


155220 


fell? 


025714 


016700 


155204 


6118 


025720 


026727 


155212 


611^ 


025726 


001002 




61^0 


025750 


052700 


000200 


61c"'l 


025734 


004 767 


001126 


61^^^ 


025740 


016700 


155156 


61.}? 


025744 


004 767 


001146 


61c'?4 


025750 


004 767 


177454 


6125. 








t>lc?6 








61."^ r 








61*?e 


025754 


005004 




61^9 


025756 


016705 


155144 


6130 


025762 


016703 


155142 


6131 


025766 


060503 




6132 


025770 


036467 


002364 


6135 


025776 


001452 




6134 








6135 








bl36 








6137 








6i3e 








6139 


026000 


016701 


155124 


6140 


026004 


016702 


155122 


6141 


026010 


004 767 


173424 


6142 


026014 


010164 


003442 


6143 


026020 


060167 


154452 


6144 


026024 


103403 




6145 


026026 


060167 


154444 


6146 


026032 


105003 




614/ 


026054 


012767 


177777 


6148 


026042 






6149 








6150 








6151 








6152 


026042 


016764 


155062 


6155 


026050 


010364 


003142 


6154 








6155 








6156 








615/ 


026054 


005064 


005502 


bl58 


026060 


010564 


003342 


6159 








6160 








6161 








6162 


026064 


010402 




6165 


026066 


026 72? 


155044 


6164 


0260 M 


001005 




6165 


026076 


00620.: 




6l6*:i 


026100 


11^202 


oor.2 /4 


6167 


026104 


010264 


005234 
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>Ka 159 



000001 



154434 



003202 



000002 



TXHINI; : ^iAVF 



t * 



JSR 



SAVE CONTENTS OF GPRS RO THRU R5. 



lb/* 

n5» 



PRE 005 



jCALL REGISTER SAVE *iUBRT. 



t StT UP THE LPR AND LNCTRL REGISTERS AS SPECiriED IN THE TX/RX CONTROL Bl.0CI<. 



MOV 
MOV 
CMP 

BNE 
BIS 

JSR 
MOV 

JSR 

JSR 



CBMAPA.R5 

CBLNCA.RO 

CBLPBA.Ol 

2$ 

0200.ro 

PC.WTWLNC 

CBLPRA.RO 

PC.WTWLPR 

PC.TXENBL 



iGET THE BIT MAP Of SELECTED LINES. 

iGET THE NEW LNCTRL CONTENTS. 

iCHECK IF INTERNAL LOOPBACK HAS BEEN SELECTED. 

(SKIP SETTING INT. LOPBCK IN MAINTENANCE HELD 

(SET INTERNAL LOOPBACK IN MAINTENANCE FIELD. 

I SET UP THE LNCTRL REGS FOR SELECTED LINES, 

(GET THE NEW LPR CONTENTS. 

iSET UP THE LPR REGISTERS FOR SELECTED LINES. 

(ENABLE TX FOR ALL SELECTED LINES. 



155136 4$: 



i SET UP AND BEGIN LOOP WHICH HANDLES ONE LINE PER ITERATION. 

CLR R4 iCLEAR THE LINE OFFSET. 

MOV CBDPAA.R5 i INITIALIZE THE TX START ADDRESS VALUE. 

MOV CB0PLA.R3 (GET THE LENGTH Of THE DATA PATTERN. 

ADO R5,R5 (CALCULATE END ADDRESS Of THE DATA PATTERN. 

BIT BITTBL(R4),CBMAPA (CHECK IF THIS LINE IS SELECTED FOR INIT. 

BEQ 121 iSKIP SET UP IF LINE IS NOT SELECTED. 



t • 

I THIS LINE IS SELECTED FOR INITIALIZATION. 

; SET UP PROPER ENTRY IN NLflBER OF CHARS TO TX ANO RX TABLE. 

( INCLUDE CHAR COUNT ON THIS LINE IN MAX ALLOWABLE CHAR TOTAL FOR ALL LINES. 

t • 

(GET THE LENGTH OF THIS LINE'S DATA PATTERN. 
(GET THE NUMBER OF PATTERNS TO TX ANO RX, 
iCALCUlATE THE TOTAL NUMBER OF CHARS TO TX/RX. 
(SET UP THE NUMBER OE TX/RX CHARS FOR LINE. 
(ADD TWICE THE NUMBER OF CHARACTERS TO TX/Rx 
I ON THIS LINE TO THE TOTAL NUMBER OF CHARS 
( WHICH WE WILL ALLOW TO BE RECEIVED ON 
( ALL LINES. 
I SET MAX CHAR TOTAL TO -1 IF OVERFLOW. 

I SET UP THE DATA PATTERN END AND LENGTH FOR THIS LINE. 

MOV CB0PLA,DPLENeCR4) (SET UP TX DATA PATTERN LENGTH FOR THIS LINE 
MOV R3.DPENDB(R4) (SET UP TX DATA PAT END ADDRESS FOR THIS LINE. 



61 
6» 



MOV 


CBDPLA.Rl 


MOV 


CBDPNA.R? 


JSR 


PC,MUL16U 


MOV 


R1.CMCNTB(R4) 


ADD 


Rl.CHRTOT 


BCS 


61 


ADD 


Rl.CHRTOT 


BCC 


81 


MOV 


0-l.CHRTOT 



SET UP THE TX COlfNTER AND CHARACTER POINTER FOR THIS I INE . 

CI R TXCNTBCR4) (CLEAR THE. TX COUNTER FOR THIS LINE. 

MOV R5.TXPTRBCR4) iSET UP THE TX CHAR POINTER FOR THIS I INE, 



1 SET UP THE TX/RX LINE ASSOCIATION OFFSET TABLE ENTRi FOR THIS LINE. 



I 



10$ 1 



MOV R4,R2 (SELECT LINE OFFSET FOR NON STAGGERED LPHK . 

CMP CBLPBA,V)2 (TEST FOR STAGGERED LOOPBACK. 

BNE lOi (SKIP SETTING STAGGERED LPBK U NOT. 

ASR R2 (FORM HiTE OFFSET INTO TAHl E FROM T\ I LM .? . 

MOVB STGTRB(R21.R2 iGM Tht Rx UNf CORRESPOND INt* WITH i\ LISL. 

MOV R2,TXRXLBlR4) (LOAD TX TABLE ENTRi WITH RX LINE UFF5hT, 



E13 



GLOBAL ':.i:8R0UTlNE 


MACRO 1 


^Iby 








^l^'^ 








6170 








6171 








61 Tc^ 


0«?6110 


005062 


003542 


6173 


026114 


005062 


003242 


6174 


026120 


01056? 


003402 


t»175 








6176 








6177 








6176 


026124 


066 705 


155010 


6179 


026130 


020503 




6180 


026132 


103403 




6161 


026154 


166705 


154770 


618? 


026140 


000773 




616? 








6184 








6185 








6186 


026142 


005204 




6187 


026144 


005204 




6188 








6189 








6190 








6191 


026146 


020427 


000040 


6192 


026152 


002706 




6193 








6194 


026 IM 








026154 


004? 36 




6195 


026156 


000207 





'?XRi^l""''-«" ""^"^ 
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^EQ 160 



12$ 
14$ 



16$ 



60$ 



I SET UP THE RX COUNTERS AND CHARACTER POINTER FOR THE RX LINE WHICH 
I IS ASSOCIATED WITH THIS TX LINE. 

I - 

CLR RXCNT8(R2) (CLEAR THE RX COUNTER FOR THIS RX LINE. 

CLR EXCNTBCR2) iCLEAR THE EXTRA CHAR COUNTER FOR THIS RX LINE. 

MOV R5,RXPTRBCR2) iSET UP THE RX CHAR POINTER FOR THIS RX LINE. 

( UPDATE THE TX START POINTER IN PREPARATION FOR THE NEXT LINE. 

ADO CBOFSA.RS jADD THE TX OFFSET TO THE Tx START POINTER. 

CMP R5.R3 iCOIiPARE TX START WITH END OF DATA PATTERN. 

BLO 16$ (SKIP WRAPAROUND IF START IS BEFORE PAT END. 

SUB CB0PLA.R5 tSUBTRACT DATA PATTERN LENGTH FROM START. 
BR 14$ (LOOP UNTIL START IS WITHIN DATA PATTERN. 

1 UPDATE THE TX LINE NUMBER OFFSET TO THE NEXT LINE. 

INC R4 
INC R4 
• ♦ 

I TEST FOR DONE HANDLING ALL POSSIBLE LINES ON THE DEVICE . 



CMP 
BLT 

PASS 

RTS 



R4,<?NUMLN5*2 
4$ 



[COMPARE OFFSET WITH 2 TIMES MAX OF LINES. 
jLOOP IF NOT ALL LINES DONE. 



PC 



JSR 



I RESTORE GPRS. 
PC,5)(SP)* 



jRETURN TO PHEG05 SUBRT 



F i 3 



DHU-U FUNC TST 


PART4 


MACRO J 


GLOBAL SUBRCIUTINE 




61^7 








6198 








6199 








6:?oo 








6:^01 








6r:o^ 








6:?o? 








6^04 








6205 








6206 








620 : 








6208 








6209 








6210 








6211 








6212 








6215 








6214 








6215 








6216 








6217 








6218 








6219 


026160 








026160 


004567 


157140 


6220 


026164 








026164 


104440 






026166 


010067 


154056 


6221 


026172 








026172 


012700 


000300 




026176 


104441 




6222 


026200 


012705 


177777 


6223 


026204 


004 767 


177124 


6224 


026210 


010567 


154036 


6225 


026214 








026214 


004 756 




6226 


026216 


000207 
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TXROFF - 



SEQ 161 



.SBTTL GLOBAL SUBROUTINE - TXROFF - 



- TURN TX AND RX OFF ROUTINE 
THIS SUBROUTINE IS USED TO TURN OFF OUT TRANSMISSION AND RECEPTION. 
THIS ROUTINE ACHIEVES THIS BY BOOSTING PROCESSOR PRIORITY TO 5 TO 
AVOID RX INTERRUPTS A^40 BY CLEARING ALL THE OUT TX. ENABLE BITS TO 
HALT TX (EITHER DMA OR SINGLE CHARACTER TX). THE STATES OF THE 
TX. ENABLE BITS AND THE PROCESSOR PRIORITY ARE SAVED FOR RESTORATION 
WHEN TX AND RX ARE RE -ENABLED. 



;* 
(♦ 

i* 
I* 

!• 
J* 

(♦ 

* 

* INPUTS: 

* OUTPUTS: 

* 

* CALLING SEQUENCE: 

* COMMENTS: 

* SL60RDINATE ROUTINES CALLED: TXOSBL. 



MAPLNS - BIT MAP OF ALL POSSIBLE LINES ON THE OUT. 

5AVPRI • SAVED PROCESSOR PRIORITY. 

SAVTEN - BIT MAP OF TX.ENBL BITS (BIT SETIF TX.ENBL WAS SET). 



JSR 



PC. TXROFF 



TXROFF:: SAVE 
GETPRI 

SETPRI 



MOV 
JSR 
MOV 
60$: PASS 

RTS 



SAVPRI 
0PRI06 



0MAPLNS.R5 
PC»T\USBL 
R5. SAVTEN 



PC 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

;GET THE PRESENT PROCESSOR PRIORITY. 

TRAP CJGPRI 
MOV RO. SAVPRI 

(DISABLE OUT INTERRUPTS. 

MOV <>PR I06.ro 
TRAP CJSPRI 

;PREPARE TO DISABLE TX ON ALL OUT LINES. 

jCLEAR ALL DUT TX. ENABLE BITS. 

(PRESERVE THE PREVIOUS TX. ENABLE BIT STATES. 

iRESTORt GPRS. 
JSR PC.aCSP)* ; RETURN TO PREG05 SUBRT. 



DHU-ll FUNC iST PART4 
GLOBAL SUBROUTINE 



G13 



MACRO M1200 15 -MAR 
- TXRON ■ 



84 09:48 PAGE 111 



^.EQ 162 



6^23 
e229 
6?.$0 
6^31 

6233 
6234 
6^35 
0236 
6257 
6238 
6239 
6240 
6241 
6242 
6243 
6244 
6245 
6246 
6247 
6248 

6249 
6250 
6251 



026220 

026220 004567 157100 

026224 016705 154022 

026230 004767 177174 

026254 

026234 

026240 

026242 

026242 004736 



016700 154010 
104441 



6252 

6253 026244 000207 



.SBTTL GLOBAL SUBROUTINE - TXRON 

t* - TURN TX AND RX ON ROUTINE - 

J* THIS SUBROUTINE IS USED TO TURN ON OUT TRANSMISSION AND RECEPTION. 

;♦ THIS ROUTINE RESTORES THE OUT TX. ENABLE BITS AND THE PROCESSOR PRIORITY 

;♦ rO THE STATES SAVED BY THE TXROFF ROUTINE. 

;* 

J* INPUTS: SAVPRI - SAVED PROCESSOR PRIORITY. 

J* SAVTEN - BIT MAP OF TX.ENBL BITS (BIT SETIF TX.ENBL WAS SET). 

;♦ 

;* OUTPUTS: OUT TX. ENABLE BITS ■ SEl TO SPECIFIED STATES. 

J* PROCESSOR PRIORITY - SET TO SPECIFIED PRIORITY. 

I* 

I* CALLING SEQUENCE: JSR PC. TXRON 
I* 

J* COMMENTS: 

J* 

;* SUBORDINATE ROUTINES CALLED: TXENBL. 

:-. **********i)L4i4i4^*4i4t**4i4t*****j|i>>********************** ******** **************** 



TXRON: : SAVE 

MOV 
JSR 
SETPRI 



JSR 
SAVTEN. R5 
PC. TXENBL 
SAVPRI 



60$ 



PASS 
RTS 



PC 



JSR 



(SAVE CONTENTS OF GPRS RO THRU R?. 

R5.PREG05 iCALL REGISTER SAVE SU6RT. 

iGET THE SAVED STATES OF THE TX. ENABLE BITS. 

iSET THE SPECIFIED TX. ENABLE BITS. 

:RESTORE THE PROCESSOR PRIORITY. 

MOV SAVPRI. RO 
TRAP CtSPRI 

(RESTORE GPRS. 

PC.a(SP)^ (RETURN TO PRfcG05 SUBRT. 



mskt 'Momui'^'' 



Hl^ 



o 
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<^E0 163 



6^35 

6^58 
6059 
6^60 
6261 
b262 
6265 
6264 
6265 
6266 
6267 
6268 
6269 
6270 
6271 
6272 
6275 
6274 
6275 
6276 
6277 
6278 
6279 
6280 
6281 
6282 
6283 
6284 
6265 
6286 
6287 

6288 
6289 
6290 
6291 
6292 
6295 
6294 
6295 
6296 
62-^/7 
6296 
6299 
63C0 
6301 
6302 
6303 
6504 
6305 
6306 
6307 
6308 
6309 
6310 



026246 
026246 
026252 
026254 
026260 
026264 

026270 
026276 
026300 
026304 

026306 
026312 

026316 
026324 
026326 
026332 

026354 
026340 
026344 
026350 



004567 
006003 
016704 
016705 
004767 

052767 
001003 
005767 
001024 

005267 
004767 

032/67 
001003 
005767 
001011 

005267 
004767 
004767 
010467 



5BTTL GLOBAL SUBROUTINE - TXRREP - 

* - REPORT FINAL TX/RX ERRORS ROUTINE - 

♦ THIS SUBROUTINF. REPORTS ERRORS WHICH ARE FOUND AFTER THE COMPLETION 

* OF THE TX. RX. AND VERIFICATION OF DATA PATTERNS. IT REPORTS ERRORS 

♦ DEALING WITH INCOMPLETE TX OR RX AND WITH DMA.START BITS. 

* 

ACTLNb - BIT MAP OF ACTIVE OUT LINES. 

DPLENB - LABEL AT BASE OF THE DATA PATTERN LENGTHS TABLE. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 

ERRNBR - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 

RXCNTB - LABEL AT BASE OF THE RX CHARACTER COUNTERS TABLE. 

RXDONF - RECEPTION DONE FLAGS. 

TXCNTB ~ LABEL AT BASE OF THE TX CHARACTER COUNTERS TABLE. 

TXDONF - TRANSMISSION DONE FLAGS. 

TXINTF ^ CONTAINS BIT MAP OF LINES WITH DMA START BIT ERRORS. 



OUTPUTS: 



* INPUTS: 

* 

* 
* 

* 



CARRY FLAG - RESTORED TO ITS ENTERING VALUE. 

ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 

MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, TXRREP 



t - - 



THIS ROUTINE REPORTS ERRORS AT INITIAL ERRNBR THRU 
INITIAL ERRMBR*2. 

IF NO LINES FAILED TO COMPLETE THEIR RECEPTION OR FAILED TO 
COMPLETE THEIR TRANSMISSION OR HAD DMA START BIT ERRORS 
THEN NO MESSAGES ARE PRINTED. 

SUBORDINATE ROUTINES CALLED: CONMAP. ER9005. ER9102. RDMAST .RRXNDN.RTXNON. 



157052 

157036 
153706 
175340 

000100 

153720 

15 7004 
175720 

000100 

153672 



156756 
171036 
175620 
156742 



TXRREP:: SAVE 



153664 



2$: 



153636 



4$: 



ROR 
MOV 
MOV 
JSR 


JSR 
R3 

ERRNBR. R4 
ACTLNS,R5 
PC. RDMAST 


BIT 

BNE 

TST 
BNE 


#6IT06. OPTION 

25 

FERROR 

60J 


INC 
JSR 


ERRNBR 
PC.RTXNDN 


BIT 
BNb 

TST 
BNE 


0BIT06. OPTION 

4$ 

FERROR 

60 i 


INC 
JSR 
JSR 

NOV 


ERRNBR 
PC . CONMAP 
PC.RRXNDN 
R4, ERRNBR 



I SAVE CONTENTS OF GPRS RO THRU 
R5.PREG05 iCALL REGISTER 
;R0TATE CARRY INTO GPR TO SAVE 
I SAVE THE INITIAL ERROR NUMBER 
;GET THE ACTIVE LINES BIT MAP. 
[REPORT ANY DMA START BIT ERRORS 



R5. 

SAVE SUBRT. 

CARRY STATE. 

VALUE. 



iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 

I YES. THEN BRANCH. 

(HAS AN ERROR BEEN DETECTED ? 

(BRANCH AND EXIT IF IT HAS. 

jSELECT INTIAL ERROR NUMBER * 1. 
(REPORT TX NOT COMPLETE IF NECESSARY. 

iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 

I YES. THEN BRANCH. 

iHAS AN ERROR BEEN DETECTED ? 

(BRANCH AND EXIT IK IT HAS. 

(SELECT INITIAL ERROR NUMBER * 2. 
(GENERATE AN ASSOCIATED LINE BIT MAP. 
(REPORT RX NOT COMPLETE IF NECESSARY. 
(RESTORE THE INITIAL ERROR NUMBER VALUE. 



DHU-11 rUNC TST PART4 
GLOBAL SUBROUTINE 



63H 0^6354 

6312 026356 
026356 

6313 026360 



006103 

004736 
000207 



MACRO M1200 15 MAR^84 09:48 
. TXRREP - 



60$! 



ROL 
PASS 

RTS 



J 



113 



PAGE 112-1 
R3 
PC 



JSR 



Si Q 164 



{ROTATE SAVED CARRY STATE BACK INTO CARRr. 
iRESTORE GPRS. THIS ROUTINE PRESERVES THE 
PC.aCSP)* J RETURN TO PREG05 SUBRT 

I INITIAL CARRY STATE. 



J13 



OHU~U FUNC TST PART4 
GLOBAL SUBROUTINE 

6515 
6516 
6517 
6318 
6519 
6320 
6521 
632^ 
6325 
6324 
6325 
6326 
6327 
6328 
6529 
6330 
6351 
6532 
6353 
6554 
6335 
6336 
6337 
6336 



MACRO M1200 15-MAR-84 09:48 PAGE 113 

- UNSDIV - 



SEQ 165 



6359 
6340 
6541 
6342 
6343 
6544 
6345 
6346 
6547 
6548 
6549 
6350 
6551 
6553 
6353 
6354 
6355 
6356 
6557 
6558 
6359 
6360 
6361 
6362 
6363 
6364 
6565 
6566 
6367 
6368 
6569 
6370 



026362 
026362 



026366 
026570 
026572 
026374 
026400 



026402 
026404 
026406 
026410 
026412 



026416 
026420 
026422 
026424 
026426 
026430 
026432 



0264 34 
026436 



004567 156736 



010204 
160104 
103405 
012701 
000442 



012605 
012602 



177777 



005004 
000241 
006001 
006004 
012700 000020 



010246 
010346 
160405 
005602 
103402 
160102 
103003 



.SBTTL GLOBAL SUBROUTINE - UNSDIV - 

J* - UNSIGNED DIVIDE ROUTINE - 

;* THIS SUBROUTINE. IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 

J* 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 

!* CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 

I* THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 

;* 

Rl - THE DIVISOR, UNSIGNED. 16 BITS. 

R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED, 16 BITS. 

R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED. 16 BITS. 



!* INPUTS: 

I* 

:* 

J* 

;♦ OUTPUTS: 

;* 

;♦ 

;♦ CALLING SEQUENCE: 



Rl - QUOTIENT. UNSi'.GNED. 16 BITS C177777 IF OVERFLOW). 

CARRY - SUCCESS FLAG. SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 



JSR 



PC, UNSDIV 



;♦ 

;♦ COMMENTS: IF THE DIVISOR IS THE QUOTIENT IS RETURNED AS ALL ONES 

;* C177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 

;* 

;* SUBORDINATE ROUTINES CALLED: NONE. 



UNSDIV:: SAVE 



J SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 



I CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 



MOV 
SUB 
BCS 
MOV 
BR 



R2.^4 

R1.R4 
- f 

60$ 



iGET MSW OF DIVIDEND FOR SUBTRACT. 

t SUBTRACT DIVISOR FROM MSW OF DIVIDEND. 

jIFIT DIDN'T GO, WE HAVE QUOTIENT < 16 BITS. 

jSET QUOTIENT TO ALL ONES (177777), 

;EXIT WITH CARRY CLEAR. 



SET UP COUNTERS AND VARIOUS WORKING GPRS. 
2*: CLR R4 



CLR 
CLC 
ROR 
ROR 
MOV 



Rl 
R4 
*16. .RO 



THE SUBTRACT AND SHIFT LOOP 



4$ 



MOV 
MOV 
SUB 
SBC 
BCS 
SUB 
BCC 



R2. -(SP) 

R3. (SP) 

R4,R5 

R2 

6$ 

R1.R2 

8J 



;CLtAR THE LSW OK THE DIVISOR. 

(CLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 

I DIVISOR BY 

i 2C UNSIGNED) 

(SET UP INITIAL SHIFT COUNT TO 16. 



(SAVE MSWORD OF DIVIDEND. 

:SAVE LSWORD OF DTVIDEND. 

iLSWORD DIVIDEND - LSWORD OF DIVISOR. 

J MSWORD DIVIDEND - BORROW . 

(IF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 

jMSWORD DIVIDEND - MSWORD OF DIVISOR. 

ilF NO BORROW. IT WENT. CARR1 IS CLEAR. 



6J 



IT DIDN'T GO. SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER), 
CARRY IS SET. 



MOV 
MOV 



(SPJ»,R3 
(SP)t,R2 



[RESTORE LSWORD OF DIVIDEND. 
(RESTORE MSWORD OF DIVIDEND. 
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6571 

657a 

6375 

6374 

6375 

6376 

6577 

6378 

6579 

6380 

6581 

6582 

6583 

6584 

6385 

6386 

6587 

6388 

6589 

6390 

6391 

6392 

6593 

6594 

6595 

6596 

6597 

6398 

6399 

6400 

6401 

6402 

6405 

6404 

6405 

6406 

6407 



6408 
6409 



026440 000401 



026442 012626 



026444 
026446 
026450 
026452 
026454 
026456 
026460 



026462 
026464 
026466 
026470 
026472 



026474 
026476 
026500 



026502 
026504 

026506 
026506 
026512 



006105 
000241 
006001 
006004 
005300 
001357 
005105 



000241 
006103 
105402 
160403 
103405 



005205 
00100 J. 
005305 



010501 
000261 



010166 
004736 



MACRO M1200 15 MAR-84 09;48 

- UNSDIV - 



BR 



PAGE 113-1 



10$ 



SEQ 166 



iGOTO SHIFT 1 INTO THE QUOTIENT. 



1 IT WENT. SO WE RESTORE THE STACK AND SHIFT A INTO QUOTIENT (WILL BE 
J COMPLEMENTED LATER). CARRY IS CLEAR. 



8J 



10$ 



MOV 



CSP)».(SP)* 



;POP THE SAVED DIVIDEND OFF OK THE STACK. 



SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 



I - 



ROL 
CLC 
ROR 
ROR 
DEC 
BNE 
COM 



R5 

Rl 
R4 
RO 
4$ 
R5 



I SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
(DIVIDE THE 
DEVISOR BY 
2 (UNSIGNED). 
COUNT THIS SHIFT AND SUBTRACT. 
LOOP FOR ANOTHER SHIFT C SUB IF NOT DONE. 
GET QUOTIENT FROM INVERTED QUOTIENT. 



NOW WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



CLC 
ROL 
BCS 
SUB 
BCS 



R3 
12* 
R4,R3 
14$ 



(CLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
jMULTIPLY LSWORD OF DIVIDEND BY 2, MSWORD IS 0. 
ilF CARRY FROM SHIFT, ROUND UP. 
(SUBTRACT DIVISOR FROM DIVIDEND. 
I IF BORROW. DON'T ROUND UP. 



ROlfl^D UP, EXTRA SUBTRACT WENT. 
12$: 



INC 
BNE 
DEC 



R5 

14$ 
R5 



(INCREMENT THE QUOTIENT BY ONE. 

(IF NO OVERFLOW. WE LEAVE THE ROUND UP. 

(DON'T LET ROUNDING CAUSE OVERFLOW. 



000004 



14$i 
60$: 



ALL DONE. PASS QUOTIENT AND EXIT. 
R5.R1 



026514 000207 



MOV 
SEC 

PASS 



RTS 



Rl 



PC 



(PASS QUOTIENT BACK IN Rl. 
(INDICATE NO OVERFLOW. 

[RESTORE GPRS. LEAVE THE FOLLOWING INTACT: 
MOV Rl.RlSl OT(SP) (PUT Rl IN STACK SLOT. 

JSR PC.aCSP)* (RETURN TO PREG05 SUBRT. 

(Rl 16 BIT, UNSIGNED QUOTIENT, 
; CARRY - SET INDICATES NO OVERFLOW (SUCCESS), 
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MACRO Mi;^O0 15-nAR-84 09:4? PAGE 114 
- UPDCHR - 



•^EQ 167 



6411 

6412 

641.^ 

6414 

6415 

6416 

6417 

6418 

6419 

64 ?0 

6421 

6422 

6423 

6424 

6425 

6426 

6427 

6428 

6429 

6450 

6431 

6432 

6433 

6434 

6435 

6436 

6437 

6438 

6439 

6440 

6441 

6442 
6443 
6444 
6445 
6446 
644 7 
6448 
6449 
6450 
6451 
6452 
6453 
6454 
6455 
6456 
6457 
6458 
6459 
6460 
6461 
6462 
6463 
6464 
6465 
6466 



026516 
026516 
026522 



026526 
026532 
026534 
026540 
026542 
026546 



026552 
026556 
026560 
026562 
026566 



026572 
026576 
026600 



004567 
016302 



016301 
005201 
020162 
103402 
166201 
010163 



016301 
005201 
001002 
012701 
010163 



016204 
020104 
103403 



156602 
005234 



003142 

003202 
003402 



003542 



177777 
003542 



003442 



.SBTTL GLOBAL SUBROUTINE: - UPDCHR - 

- UPDATE CHARACTER POINTERS AND COUNTERS ROUTINE - 
THIS SUBROUTINE UPDATES THE POINTERS AND COUNTERS ASSOCIATED WITH 
THE RECEPTION OF A CHARACTER ON A SPECIFIED LINE. THE RECEIVE CHAR 
POINTER IS SET TO THE NEXT EXPECTED CHARACTER. THE RECEIVE CHAR COUNT 
IS INCREHENTED. AND THE COUNT IS CHECKED TO DETERMINE IF THE RECEPTION 
IS COMPLETE. IF THE RECEPTION IS COMPLETE THE RECEPTION DONE FLAG 
IS SET FOR THE SPECIFIED LINE. 



;* 
;* 
J* 

!* 

J* 

;♦ 
;* 
i* 
;♦ 
J* 
i* 
:* 
t* 
;* 
t* 
J* 
i* 
I* 
;♦ 
I* 
;♦ 
i* 

!* 

;* 

;♦ 
J* 

i * 



INPUTS: R3 - LINE NUMBER TIMES 2 OF LINE ON WHICH CHAR WAS RECEIVED. 

BITIBL - LABEL OF TABLE OF WORDS USED TO FORM SINGLE BIT MAPS. 

CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 

DPENOB - BASE OF DATA PATTERN END ADDRESSES TABLE. 

DPLENB - BASE OF DATA PATTERN LENGTHS TABLE. 

RXCNTB - BASE OF THE RX CHARACTER COUNTERS TABLE. 

RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 

TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

OUTPUTS: FOLLOWING VARIABLES UPDATED FOR LINE ON WHICH CHAR WAS RECEIVED: 
RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 
RXDONF - RX DONE FLAGS WITH BITO FOR LINE ... (UPDATED). 
RXPTR - UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 



CALLING SEQUENCE; 
COMMENTS: 



JSR 



PC. UPDCHR 



SUBORDINATE ROUTINES CALLED: NONE. 

UPDCHR:: SAVE j SAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 jCALL REGISTER SAVE SU6RT. 
MOV TXRXLB(R3).R2 jGET TX LINE NUMBER OFFSET FOR THIS RX LINE. 

J ♦ 

I UPDATE THE RX DATA POINTER WITH WRAPAROUND AT THE END OF THE DATA PATTERN. 

;GET THE RX DATA POINTER FROM THE RX PTR TABLE. 
I INCREMENT THE RX POINTER VALUE BY 1. 
I CMP RX PTR VALUE WITH ADR OF END OF DATA PAT. 
;SKIP WRAPPING RX PTR AROUND IF NOT AT END. 
jWRAP RX PTR AROUND TO START OF DATA PATTERN. 
; UPDATE THE RX POINTER WITH THE NEW VALUE. 



2J 



4«: 



MOV 


RXPTRB(R3).R1 


INC 


Rl 


CMP 


R1,0PEN0B(R2) 


BLO 


2$ 


SUB 


DPLENB(R2),R1 


MOV 


R1,RXPTRB(R3) 


THE 


RX CHARACTER COU 


MOV 


RXCNTBCR3),R1 


INC 


Rl 


BNt 


4$ 


MOV 


t> l.Rl 


MOV 


R1.RXCNTB(R3) 



jGET THE RX CHARACTER COUNT. 
(INCREMENT THE RX CHAR COUNT VALUE BY 1. 
iSKIP SETTING COUNT TO MAX IF NO OVERFLOW. 
(SET RX CHAR COUNT VALUE TO MAX VALUt . 
(UPDATE THE RX CHAR COUNT WITH NEW VALUE. 



( cm i Iv FOR HX CCMPLEriON ON THIS LINE. 

I IF HX IS COMPLETE ON THIS LINE. SET THE CORRECT RX 



DONE FLAG. 



MOV CHCNrB(R2),R4 
CMP R1,R4 
BLO 60 



(GET THE NUMBER OF TX CHARS IN COMPIETE 1\. 
(COMPARE HX CHAR COUNT WITH NUMBER Oi Ix CHARS 
[EXIT ROUTINE IF NOT ALL CHARS RtCblVbD. 



M 1 3 

gffiBil^. moi^iN^'^''" MACRO mPOOp^JS^MAR. 84 09:48 PAGF.114.1 C.EQ168 

6467 026602 056367 00236^ 153674 BIS BITTDL(R3) , RXDONF jSET THE RX DONt: FLAG FOR THIS LINE. 

6468 

6469 C26610 60$: PASS iRESTORE GPRS. 

026610 004736 JSR PC.a(SP)+ ;RETURN TO PRtGOS SUBRT. 

6470 026612 000207 RTS PC 
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MACRO Ml^OO 15 MAR-^84 09:48 PAGE 115 

- vArsisup - 



SEQ 169 



64 7.} 

64 75 

64 74 

64 75 

64 76 

64 7 7 

64 73 

64 79 

6480 

6481 

648? 

6465 

6434 

6485 

6486 

6487 

6488 

6489 

6490 

6491 

6492 

649? 

6494 

6495 

6496 

6497 

6498 

6499 

6500 

6501 

6502 

6505 

6504 

6505 

650b 

6507 

6508 
6509 
6510 
6511 
6512 
6513 
6514 
6515 
6516 
6517 
6518 
6519 
6520 
6521 
6522 
6525 
6524 
6525 
6526 
6527 



026614 
026614 
026620 
026624 
026650 
026634 



026640 
026644 
026650 
026652 
026654 
026660 
026662 
026664 
026666 
026672 
026700 
026702 
026706 



004567 
005067 
005067 
005067 
005067 



010167 

012701 

005201 

005201 

012721 

010221 

010521 

01042^ 

016/21 

0527b/ 

001404 

012/02 

110221 



- TRANSMISSION / RECEPTION SET-UP ROUTINE - 

THIS ROUTINE IS USED TO INITIALISE BOTH THE OUT AND THE 
TRANSMISSION/RECEPTION CO.^TROL PARAMETERS TO THE CORRECT 
STATE. PRIOR TO A SINGLE CHARACTER OR DMA TRANMISSION, 
RECEPTION TEST. 



SBTTL GLOBAL SUBROUTINE VANSUP ^ 

*■ 

♦ 
♦ 

* 

* INPUTS: 

*. 

♦ 

* 

♦ 

*■ 



4 

♦ CAL TNf^ SEQUENCE 

*. 

♦ COMMENTS: 

*■ 



Rl - TX. RX LPR CONTENTS. 

R2 ■■ START ADDRESS OF DATA PATTERN TO TRANSMIT. 

R3 - LENGTH OF DATA PATTERN. 

R4 - NUMBER OF PATTERNS TO TRANSMIT. 

ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 

LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODL SELECTED. 

CBB - LABEL AT BASE OF TX/RX CONTROL BLUCK. 

THE CONTENTS OF THE TX/RX CONTROL BLOCK (CCB) ARE DESTROYED. 

THE INDIRECT ADDRESS FIELD OF THE OUT CSR MAY BE DESTROYED. 

THE DUT'S LPR' 5 AND LNC'S MAY BE MODIFIED. 

THE FOLLOWING POINTERS AND COUNTERS ARE INITIALISED; 

CHCNT.CHRTOT.DPEND.OPLEN.EXCNT.RXCNT.RXPTR.TXCNT. 

TXPTR TXRXL 

CHRTOT, RXDONF, TXDONF AND TXINTF ARE CLEARED. 



JSR 



MODEM LOOPBACK 
VIA HARDWARE P 



PC, VANSUP 

MODE IS INHIBITED IK 
TABLE QUESTIONS, AND 



IT HAS BEEN SELECTED 
INTERNAL LOOPBACK MODE 



IS FORCED TO TAKE PLACE. 



t* SUBORDINATE ROUTINES CALLED: CONMAP.RXENBL . TXRINI . 



156504 

155652 
1554 54 
^ j5646 
153644 



154256 
003122 



000004 



1^.3500 
000004 

000001 



VANSUP I : SAVE 

CLR CHRTUT 

CLR TXINTF 

CLR TXDONF 

CLR RXDONF 



(SAVE CONTENTS OF THE GPR' S RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT . 
iCLEAR TOTAL RECEIVED CHAR COUNTER. 
i CLEAR FLAGS USED TO LOG DMA H.OVER ERRORS 
I CLEAR THE TX DONE FLAGS. 
1 CLEAR THE RX DONE FLAGS. 



SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO THE DESIRED STATE. 



153274 



MOV Rl.CbB 

MOV /^COB.Rl 

INC Rl 

INC Rl 

MOV «4,CR1)» 

MOV R2,(Rnt 

MOV R5,CR1 )* 

MOV R4.CR1)* 

MOV ACTl NS,CR1)> 

HIT OB I T2. LOPBCK 

BEQ 2$ 

MOV 01, R2 

MOVB R2,CR1)* 



iSET CONTENTS OF LPR PAHAMS IN TX/RX C.BLK. 
;GET BASE ADDRESS OF CONTROL BLOCK. 
(INCREMENT ADDRESS FOR NEXT WORD 
(INITIALISE THE FOLLOWING IN THE CNTRL.BLK; 



ENABLE RECEIVERS. 
^ATA PATTERN. 



LNCTRL PARAMETER 

START ADDRESS OF 

DATA PATTERN L.ENv3:" 

NUMBER OF DATA PATTERNS TO TRANSMIT. 

BIT MAP OF LINES TO INITIALISE. 
(TEST IF MODEM LOOPBACK MODE HAS BEEN SELLCIH) 
jDONT SELECT INTERNL LOPBCK IF STAGRD OR LOCAL 
jFORCE INTERNAL LOOPBACK MODE TO BE SELECTtD. 
(INITIALISE LOOPBACK MODE IN CONTROL BLOCK. 



GLOBAL SI ©ROUTINE 



t-rL4 



MACHO Ml^OO IS MArt 84 09:48 PACit 115*1 
VANSUP 



SFO 170 



6S^8 


0^6 710 


000402 




65?^ 


026 712 


116721 


15.V56 


6550 


026 716 


005201 




6551 


026720 


0127U 


000002 


65 5 J 








65?:^ 








6554 








b^^S 








6556 


026 724 


004 76? 


176754 


b55' 








6558 








655^ 








6540 


026 750 


012701 


17 7 7 7 7 


6541 


C26 7 54 


016 702 


\53252 


654,^ 


026 740 


005101 




r»54 5 


026/42 


005102 




6544 


026 '44 


040102 




6545 


026 746 


010267 


154162 


6546 


026 752 


00506 7 


154154 


654 7 


026756 


004 767 


176722 


6548 








6549 








6550 








6551 








655P 


026 762 


012705 


17 7 7 7 7 


h555 


026766 


004767 


175512 


6554 








6555 








65r.6 








655 7 


026? 72 


016705 


155174 


6558 


026 7 76 


004 76 7 


170400 


655'^ 


02 7002 


004 767 


175372 


f)560 


02 7006 








02 7006 


004 7 .^6 




6b6l 


^27010 


000207 





iSKIP NEXT INSTRUCTION IF IN MOOFM lOOPBACK. 

I SET LOOPBACK MODE. 

(INCREMENT ADDRESS FOR THE NEXT WORD. 

(SET AMOUNT OF OFFSET fcACH TX STARTS AT TO 2. 

i INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS. TO THE STATE 
t DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 





BR 


4» 


2J; 


MOVH 


LOPBCK.CRDf 


4): 


INC 


Rl 




MOV 


^2.(Rn 



\ 



JSR 



PC.TXRINt 



I INITIALISE DUT. 



» INITIALISE POINTERS AND COUNTERS rOR INACTIVE LINES TO ZERO. 



MOV *MAPLNS,R1 

MOV ACTLNS,R2 

COM Rl 

COM R2 

BIC R1,R2 

MOV R2,CBMAPA 

CLR CBOPNA 

JSR PC.TXRINI 



(GET THE LINE BIT MAP roR ALl LINES. 

iGET THE ACTIVE LINE BIT MAP. 

1 

I 

iGENERATE AN IN ACTIVE I INf HIT MAP. 

iMOVE BIT MAP TO THE CONTROL BLOCK. 

(CLEAR THE REPEAT TX COUNT IN CNTRl Bl Ci< . 

iSFT UP PARAMETERS FOR INACTIVf IINES. 



I DISABLE RECEIVERS ON ALl I INES TO ENSURE CORRECT INITIAl ISATION OF ONI. r THE 
I LINES THAT ARE SELECTED. 



I 



MOV •MAPLNS.R5 

JSR PC.RXOSBl 



(SET UP BIT MAP FOR ALL LINES. 
(DISABLE Px ON ALl LINES. 



1 ♦ 



i ENABLE RECEIVERS ON ASSOCIATED CRX) LINES. 

t - 

MOV ACTLNS.R5 iGET THE ACTIVE L INt BIT MAP. 

JSR PCCONMAP iGENERATt AN ASSOCIATED LINE BIT MAP. 

JSR PC.RXENBL lENABLf RECEIVERS ON ASSOCIATED LINES. 

60lt PASS iRFSTOnt GPRS, 

JSR PC.aCSP)' iRLTURN Tg PREG05 SUBRT. 

RTS PC 



C14 



m^k' mum"'''' 



MACRO 



Ml^Og 



AT 



^^^MAR 



64 09iAi\ PAGK 116 



'.F.Q 1.71 



^S^5 
^^^4 

nSb3 

^^ /4 
t.^ :^ 

hS81 

bse? 

ft584 
6585 
6586 
658 ; 
6568 
658<* 
6590 
6591 

6592 
6593 
6594 
6595 
6596 
6597 
6598 
6599 
6600 
6601 
660^ 
6605 
6604 
6605 



660^ 
6607 



027012 
027012 
027016 
027020 
027022 
027026 
027052 
027054 
027056 
027040 
027042 
027046 
027050 

027054 
02 7056 
027056 
02/062 



SBTTl GlOBAl SUeROUTINt WATBI^ 

- WAIT FOR BIT SET ROUTtNF. - 
THIS StSROUTINh WAITS FOR THE SPECIFIED BIT TO BECOMF SET. I^ THE 
SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME OUT 
PERIOD A SUCCESS I^40ICATI0N IS RETURNED BY THIS ROUTINE. 



THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RtnjRNED TO 
ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS 



INPUTS: 



Rl - TIME-OUT VALUE 
BITS 15 THRU 12 
BITS a THRU 



AND BIT NUMBER INDICATION: 

NUMBER OF BIT TO TEST CRANGE THRU 15). 

TIME OUT VALUE IN MILL I 'SECONDS C4005 MAX) 



R2 



ADDRESS 



OF 
H5LCNT. 



WORD CONTAINING THE. BIT TO TEST 



OUTPUTS 



R2 - THE LAST WORD WHICH WAS READ TO CHECK 
CARRY - SUCCESS FLAG (CARRY SET IF BIT SET 



FOR the: coNonioN. 

BEFORE TIME OUT), 



CALLING SEQUENCE! 



COMMENTS; 



MOV 01 50040, Rl 

MOV *LABEL.R2 
JSR PC.WAIBIS 



(PASS BIT 11 (15 OCTAL ) AND 

I 32 (40 OCTAL) MS DEL At . 

iTEST BIT IN WORD AT "LABEL*. 

jWAIT 32 MS FOR BIT H TO SET 



SUBORDINATE ROUTINES CALLED: MSLGET. 



004567 
O102O4 
010102 
042701 
042702 
000502 
006202 
006202 
OO6202 
016202 
O102O5 
004 767 

010002 

010266 
004/56 



156306 



1 70000 
007777 



002564 
172020 

000006 



02 7064 000207 



*4***4********************************«*********«****«*«f«***********4«**** 

I SAVE CONTENTS Of GPRS RO THRU R5. 
fi5,PREG05 iCALL REGISTER SAVE SUBRT. 

(SET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPERATE DELAY COUNT OUT OF PASSED PARAMETtR. 
iSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
(PUT LINE NUr«ER FIELD IN LSBYTE. 
iSHIFT TMe LINE NUMBER FIELD INTO THE PROPER 
I POSITION TO USE IT HS A WORD TABLE OFFSET 
I FOR THE TABLE LOOKUP OF ^^ LINE BIT MAP. 
iGET BIT MAP OF LINE TO TEST FROM TABLE. 
I INDICATE THAT THE BIT SHOULD BE SET. 
iWAIT FOR THE BIT TO BE SET WITHIN TIME OUT. 
I CARRi IS CORRECT UPON MSLGET RETU«N. 
(PASS LAST VALUE READ AS OUTPUT PARAMETER. 
EXCEPT THE FOLLCWiNti; 

iPUT R2 IN STACK SLOT . 
(RETURN TO PRFl'.OS ^L41RT 

MEMO LOOKING ^ OR CONDI HON. 

FLAG I SET IF BIT rOl*ND :iLT), 



WAIBISj 


I SAVE 


JSR 




MOV 


R2.R4 




MOV 


R1.R2 




BIC 


•1/0000, Rl 




BIC 


#7777. R2 




SWAB 


R2 




ASR 


R2 




ASR 


R2 




ASR 


R2 




MOV 


BITTBL(R2),R2 




MOV 


R2.R5 




J5R 


PC.MSLGEr 




MOV 


H0.R2 


601: 


PASS 


R.' 

MUV 
JSR 



RTS 



PC 



(RESTORE GPR^, 

R2.R2SI Or(SP) 

PC,8(SP)' 

» R2 LAST VALUE 

I CARRY SUCCESS 



1)14 



mnki' m^omun''' ^'^*^«^ ^^^^arw^^c^'^^ «^ ^^'^« ^'^^^ ^^^ 



^FQ i;^ 



bMO 
t^b 1 1 

bbl4 

66? 1 

bt>J4 
66:?5 
bb?6 

6628 
66P9 
6650 
6631 
665? 

6655 
6654 
6655 

66 5t) 
6657 
6o58 
6659 
bb40 
b641 
6h4? 
664 5 
h*>44 
664 S 

6646 



037066 
027066 



0370/? 
037076 
03 7100 
037103 



037113 
037113 
037114 



004567 156353 



016/01 
010003 
010505 
013704 



00'»^56 

oooao? 



155113 
177V7V 



037106 004767 166706 



. SBTTL GLOBAL SUBROUUNt - wJTWLNC 

LINE CONTROL REGISTER SETUP ROUT INF 
THIS SUBROOUNE IS USED TO SET THE DEVICE UNDER TEST (OUT) LINE 
CONTROL REGISTERS (LNCTRL) TO THE SPECIFIED STATE. ONLY THE LNCTRLS 
FOR THE SPECIFIED LINES ARE ALTERED. 

INPUTS; RO NEW LINE PARAMETERS. 

R5 - BIT MAP or LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

lESTAT ' CONTAINS THE CURRENT STATF OF THE TX AND RX INTERRUPT 

ENABLE BITS IN THE CSR. 
LNCTRA - CONTAINS ADDRESS OF THE DUT INCTHL REGISTERS. 

OUTPUTS: LNCTRL - SPECIFIED DUT LINE CONTROL REGISTERS ARE ALTERED. 

CALLING SEQUENCE; JSR PC.WTWLNC 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: ALTFLO- 



WTWLNC:: SAVE 

( * 



jSAVE CONTENTS Of GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT. 



SET UP THE PARAMETERS FOR THE CALL TO ALT^LD. 



t - 



MOV 
MOV 
MOV 
MOV 



LNCTRA. Rl 

R0.R3 

R5,R5 

:.R4 



iSET UP THE REGISTER ADDRESS PARAMETER. 

iSET UP THE DESIRED REGISTER CONTENTS. 

tSET \^ THE BIT MAP Of LINES TO ALTER. 

iSElECT ALL REGISTER BITS TO BE ALTERED. 



I CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 



60$ I 



JSR 

PASS 

RTS 



PC.ALTKLD 

JSR 
PC 



|Al TER THE REGItiTER CONTENTS. 

iRETURN TO PREG05 SUORT, 



iRrsrowt GPRS. 
PC,&l(SP)t 



E14 



OHU-ll ^UNC 1ST f'ARr4 
GLOBAL ru?eROUTINE 

hh4a 
664<^ 

bbSl 

6655 
bbS4 
b6S^ 
665t. 
66 'j V 
6658 
665^ 
66d0 
6661 
66 he"' 
D6b5 
6664 
6665 
6666 
666/ 
6668 
666*? 
6670 
6671 



667.^ 
667.5 
6674 
6675 
6676 
6677 
6678 
66 79 
6680 
6681 
668c^ 
6683 
6684 

6685 



0?7116 
027116 



0?712a 
0^7126 
027150 
027132 



027142 
02/142 
027144 



016701 
010002 
010505 
012704 



004756 
000207 



MACRO M1200 15 MAR 84 09:48 PAGE 118 
- WTWLPR - 



'^EQ 173 



004567 156202 



153056 
177777 



027156 004767 166656 



SBTTL GLOBAL SUBROUTINE - UTWLPR 

- LINE PARAMETER REGISTER SETUP ROUTINE 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST C OUT ) LINE 
PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE. ONLY THE LPRS F*OR 
THE SPECIFIED LINES ARE ALTERED. 



INPUTS: 



RO - NEW LINE PARAMETERS. 

R5 - BIT MAP OF LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

lESTAT CONTAINS THE. CURRENT STATE OF THE TX AND RX INTERRUPT 

ENAaLE BITS IN THE CSR. 
LPRA - CONTAINS ADDRESS OF THE OUT LPR. 



OUTPUTS: 



LPR 



CALLING SEQUENCE: 
COMMENTS: 



SPECIFIED DUT LINE PARAMTER REGISTERS ARE ALTERED. 

JSR PC. WTWLPR 



SUBORDINATE ROUTINES CALLED: ALTFLD. 

****4<******4i**********«****A************************ *********************** 



JSR 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SUBRT. 



WTWLPR: J SAVE 

I SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 

MOV LPRA.Rl ,SET UP THE REGISTER ADDRESS PARAMETER. 

MOV R0,R2 (SET UP THE DESIRED REGISTER CONTENTS. 

MOV R5,R5 iSET UP THE BIT MAP Of LINES TO ALTER. 

MOV 0-1. R4 tSELECT ALL REGISTER BITS TO BE ALTERED. 

i CALL THE SUBROUTINE WHICH ALTERS THF RFGISTtR CONTENTS. 



60$: 



vJSR 

PASS 

RTS 



PC, ALTFLD 

JSR 
PC 



lALTFH THE REGISTER CONTENTS. 

iRESlURt GPRS. 

PC.aCSP)* iHETURN TO PREGOS SUBRT. 



[-14 
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INTERRUPT SERVICE ROUTINE - CLKXNT - 



SEQ 174 



^t>8 7 
6688 
668«> 
66*^0 
6691 
669i^ 
6695 
6694 
669S 
6696 
6697 
6698 
6699 
6700 
6701 
6702 
6705 
6 704 
6705 
6706 
6707 
6708 
6709 
6710 
6711 
6712 
6713 
6714 
6715 
6716 
6717 
6718 
6719 
f)720 

6721 
6722 



027146 
027152 
027154 
027160 
027164 
027166 
027172 
027176 
027200 
027206 
027210 
027210 
027212 
02V214 



005767 
001402 
005367 
005767 
001402 
005367 
005367 
001006 
016767 
010046 

104422 
012600 
000002 



153126 

153120 
153116 

153110 
155106 

153102 153076 



TTL INTERRUPT SERVICE ROUTINE - CLKINT - 

THIS ROUTINE IS EXECUTED CLKHRZ TIMES PER SECOND. IT DECREMENTS THE 
TWO TIMER COUNTERS DOWN TO ZERO, 



INPUTS; 



.SB 

I ♦ ♦ 

;♦ 

I* 

1* 

I* 

J* 

1* 

i* 

J* OUTPUTS: 

i* 

1* 

i* 

;♦ 

1* 

t* 

;» COMMENTS: 

;* 
(* 
;* 
I* 



TIMER! - TIMER COUNTER #1. 
TIMER2 - TIMER COUNTER *2 . 
TIMERS - TIMER COUNTER FOR CALL Or BREAK MACRO. 

THE 2 TIMER COUNTERS ARE DECREMENTED If THEV ARE NOT ZERO. 



CALLING SEQUENCE 



PUT *CLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 
PUT THE DESIRED TIME PERIOD C SECONDS TIMES CLKhR/) IN 
EITHER TIMERl OR TIM£fi2 AND POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO ON TIME-OUT. 



THE 2 COUNTERS UILL NOT WRAPAROUND BUT WILL 
ALLOWS THE DETECTION OF A TIME-OUT ANY TIME 
HAS OCCURRED UNTIL THE TIMER COUNTER IS SET 



STOP AT 0. THIS 
AFTER THE TIME-OUT 
TO ANOTHER VALUE. 



SUBORDINATE ROUTINES CALLED: NONE. 



CLKINT: 



2$ 



4$ 



60$: 



TSf 
BEQ 
DEC 
TST 
BEQ 
DEC 
DEC 
BNE 
MOV 
MOV 
BREAK 

MOV 
RTl 



TIMERl 

2i 

TIMERl 

TIMER2 

4$ 

TIMER2 

TIMERS 

60i 

BCOl^NT 



TIMERS 



I CHECK FOR 
I BRANCH TO 
(DECREMENT 
J CHECK FOR 
I BRANCH TO 
; DECREMENT 
t DECREMENT 
iFXlT IF NOT 
J St I UP TIME 



TIMERl AT ZERO. 

LEAVE IT AT ZERO IF IT IS ZERO. 

TIME COUNT. 

TIMER2 AT ZERO. 

LEAVE IT ALONE IF 

TIME COUNT. 

THE BREAK COUNT. 

TIME TO CALL BREAK 

TILL NEXT BREAK. 



IT' S ALREADY ZERO, 



RO, (SP) 



(SP)*.RO 



J SAVE CONTENTS OF RO FROM BREAK MACRO. 
iCHECK FOR OPERATOR CONTROL/C. 



iRtSTORE CONTENTS OF RO. 



TRAP 



CJBRK 



G1.4 



DHli U f-UNC 1ST PART4 MACRO Mlc^OO 15 riAR-84 09:46 PAGE li>0 
INTFRRl'PT SERVICE ROUTINE - RXCHRS 



"^EQ 175 



6 7?*^ 

6:?o 

^'51 

675? 

o75S 
675b 
6 75 7 

6738 
6759 
6740 
6741 
6742 
6^43 
6744 
6745 
6746 
r.74 7 
6748 
6 74 '-J 
6750 
6751 

6/5c: 

6753 
6754 
6755 
6756 
6757 
6758 
6759 
6760 
6761 
6762 
6765 
67t>4 
6765 
6766 
6767 
6 768 
6769 
6770 
6771 
67 72 

hr/.^ 

6774 
67 75 
6 7 76 
6 7 7 7 
6778 
6779 
6780 



027216 
027220 
027224 

027226 
027254 
027236 
027242 
027246 
027254 
027262 
027264 

02 72 72 
02/2/6 
02 7 304 
027506 

027512 
027514 
02/516 
02 7322 
027326 



010546 
017702 
1000S4 

026727 
105402 
004 767 
010277 
06276 7 
026727 
105403 
012767 

005267 
026 /2 / 
002745 
005767 

100415 
010546 
012705 
004 /6 7 
010567 



SBTTL INTERRUPT SERVICE R0UTI^4E - RXCHRS - 

- DMA RECEIVE INTERRUPT SERVICE ROUTINE - 
THIS ROUTINE EXECUTES IN RESPONSE TO AN INTERRUPT CAUS 
RX. DATA. AVAIL BIT BECOMING ACTIVE. THIS ROUTINE READS 
THE OUT RECEIVE CHARACTER FIFO AND DEPOSITS THEM INTO 
BUFFER IN MEMORY. IF THE NUMBER OF CHARACTERS IN THE 
EXCEEDS A SPECIFIED THRESHOLD. TRANSMISSION IS HALTED 
OUT TX. ENABLE BITS) AND IF THE RECEIVE BUFFER IS FULL 
HALTED CBY DISABLING RX INTERRUPTS). THE ROUTINE EXIT 
BUFFER BECOMES FULL OR IF A CHARACTER IS READ FROM THE 
DATA. VALID BIT CLEAR. 



ED By the OUT 

CHARACTERS FROM 
THE RECEIVE 
RECEIVE BUfFEH 
(BY CLEARING ALL 
RECEPTION IS 
S ir THE RECEIVE 
FIFO WITH THE 



INPUTS: 



OUTPUTS: 



RBUFA - CONTAINS ADDRESS OF THE OUT RX CHARACTER FIFO. 

RXBCNT - RX BUFFER CHARACTER COUNT. 

RXBDTX EQUATED TO RX BUFFER LEVEL AT WHICH TO DISABLE TX 

RXBEND - LABEL AFTER END OF THE RX BUFFER AREA IN Mt:MO^Y . 

RXBFUL - EQUATED TO THE CAPACITY OF THE RX BUFFER. 

RXBIPT - POINTER TO NEXT AVAILABLE INPUT SLOT OF Rx BUFFER 

RXBSTA - LABEL AT START OF RX BUFFER AREA IN MEMORY. 

RXBIPT - UPDATED TO POINT TO NEXT INPUT SLOT OF RX BUFFER. 
RXBCNT - RX BUFFER CHARACTER COUNT C INCREMENTED) . 
TXENBM - MAP OF PREVIOUS OUT TX. ENABLE STATES. 
CARRY ■ "SUCCESS- FLAG (SET IF BUFFER IS NOT flJLL). 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL RXCHRS IN THE VECTOR 
LOCATION. 



152756 



153464 000100 



172562 
155446 
000002 
153434 



153440 
003120 



002720 153422 



155420 
155414 

153174 



17/;;; 

1 /f)00*i 
152V30 



000050 



COMMENTS: IF THE RX BUFFER IS FU.L UPON ENTRY, THIS ROUTINE ABORTS THE 
PROGRAM. 

SUBORDINATE ROUTINES CALLED; RXIEO. TXDSDL . 

I SAVE CONTENTS OF GPR R2. 
READ A CHARACTER FROM THE OUT RX FIFO. 
EXIT THE ROUTINE IF THE DATA. VALID BIT IS CLR. 

COMPARE B'JFFER COUNT WITH BUFFER CAPACITY. 
SKIP ABORT ir BUFFER 15 NOT FULL. 
ABORT. MUST BE A PRCXiRAM BUG. 
PUT THE CHAR IN THE BUFFER. 
UPDATE POINTER TO THE NEXT BUFFER SLOT. 
CHECK IF POINTER SHCXXD WRAP AROUND. 
SKIP WRAPAROUND IF POINTER IS NOT AT END. 
WRAP INPUT POINTER AROUND. 

COUNT THIS CHARACTER AS BEING IN THE BLM-FFR. 

CHECK FOR BUf^FER AT DISABLE TX LEVEL. 

SKIP DISABLING TX IF BUFFER LEVEL NOT CORRECT, 

CHECK STATE OF TX DISABLE FLAG. 

BRANCH IF TRANSMISSION ALREADY DISARUO. 

SAVE THE VALUE OF GPR R5 . 

SPECIF 1 THAT ALL LINES SHOL'l Bt AKFFCTeti. 

CI EAR IHt r^ ENABIES f OR Al i I INf- S . 

SAVE PREVIOUS TX ENABLE STAltS iN STORAGE. 



RXCHRS: 


• 


MOV R2, -(SP) 


2$i 


MOV 


aRBUFA.R2 t 




BPL 


60J 1 




CMP 


RXBCNT. ORXBFUL j 




BLO 


4( 1 




JSR 


PC, OOPS ( 


4$: 


MOV 


H2.aRXBIPT t 




ADD 


«2, RXBIPT I 




CMP 


RXBIPT, i^RXBENO j 




BLO 


61 1 




MOV 


^RXBSTA, RXBIPT \ 


6*: 


INC 


RXBCNT J 




CMP 


RXBCNT, ftRXBDTX t 




Bl 1 


?i 1 




TST 


rxOBLF , 




BMI 


d( t 




MOV 


R5. (SP) t 




MOV 


«MAPl NS.R5 , 




JSR 


PC.TXDSBL I 




MOV 


R5.T/ENBM j 



H14 
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INTfcHRUPT SERVICE ROUTINE • RXCHRS - 



SEQ 176 



6791 0^733^ 01^605 

6782 027334 012767 
6783 

6784 027542 02672/ 

6785 027350 103723 
6786 

6787 027352 004767 

6788 

678*^ 02/356 012602 

6790 027360 000002 



100000 153144 
153350 000100 8$ 



175116 



60$ 



MOV 
MOV 


(SP)*.R5 
V/BIT15,TXDBLr 


CMP 
BLO 


RXBCNT,V>RXBFUL 
2i 


JSR 


PC.RXiro 


MOV 
RTI 


(SP)f.R2 



(RESTORE GPR R5. 

(PREVENT TX FROM BEING DTSABLEH -AGAIN. 

;CHECK FOR Bl» ER FULL CONDITION. 

I LOOP TO READ ANOTHER CHAR IF BUFFER NOT FULL. 

iBUFFER IS FUIL, DISABLE RX INTERRUPTS. 

(RESTORE R2 TO ITS SAVED VALUE. 



114 



DHU-11 FUNC rST PART4 
TRAP SERVICE ROUTINE 



MACRO Mlc^OO 15-MAR-84 09:48 PAGE li^l 
- TP4BRT - 



SEQ 177 



6792 
6793 
6794 
6795 
6796 
6797 
6798 
6799 

6800 
6601 
680.^ 
6805 
6804 
6805 
6806 
6807 
6808 
6809 
6810 
6811 
68 1^ 
6813 
6814 
6815 
6816 
6817 
6818 
6819 
6820 
6821 



SBTTL TRAP SERVICE ROUTINE - TP4BRT 

* BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 

* THIS ROUTINE IS USED DURING THE DMA ADDRESS TEST. 

• IT DETERMINES IF THE 004 TRAP WAS CAUSED BY AN "EXPECTED" ERROR OR 

* NOT BY EXAMINING THE RETURN PC VALUE ON THE STACK. IF THE TRAP IS 

♦ UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL DIAGNOSTIC SUPERVISOR 

♦ 004 TRAP HANDLING ROUTINE. 
*. 

SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 
TRPAD2 - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR. 
004 TRAP FLAGS. 



TP4FLG 



* INPUTS: 

* 

♦ OUTPUTS: 

CALLING SEQUENCE J 



TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED. 



PUT ADDRESS POINTED TO BY TP4BRT IN 004 VECTd 
OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTTNl 



COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABEt ED 
TRPAD2 WILL BE HANDLED Bt THE NORMAL 004 TRAP SERVICE ROUTINE, 
THIS ROUTINE IS USED IN CONJUNCTION WITH CKTRPB SUBROUTINE. 

SUBORDINATE ROUTINES CALLED; NONE. 



027362 
027366 

027370 
0273 74 
027402 



021627 
001402 
00017 7 
052767 
000002 



017320 

152662 
100000 



TP4BRT: 



152652 2$ 



CMP 
BEQ 
JMP 

BIS 

RTI 



(SP).ftTRPAD2 

2$ 

STP4VEC 

fleiTl5.TP4FuG 



jCOMPMRE EXPECTED ADDR WITH TRAP RET PC. 
ilF THEY MATCH, CONTINUE THIS ROUTINE. 
;IF NOT. JUMP TO NORMAL 004 TRAP SERVICE 
iSET THE 004 TRAP OCCURED fLAu. 
J ALL DONE, GO BACK TO THE TEST. 



RTN 



J 14 



OHU-ll fUNC TST PART4 MACRO Ml^OO 
GLOBAL TRAP SERVICE ROUTINE - TP4 



^?N 



MAR 84 09:48 PAGE 1^2 



'^EQ 176 



^8^3 
6824 
68^5 
b8J!t. 
68;?? 
6829 
6829 
6830 
6851 
6852 
6835 
6854 
6835 
6856 
6857 
6838 
6839 
6840 
6841 
6842 
6843 
6844 
6845 
6846 
684 7 
6848 
6849 
6850 
68S1 



027404 
027410 
027412 
027416 
027424 



02162 7 
001402 
000177 
052767 
000002 



017270 

152640 
100000 



SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN - 

♦ BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 

♦ THIS ROUTINE DETERMINES IF THE 004 TRAP WAS CAUSED BY 

♦ AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 

♦ STACK. IF THE TRAP IS UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL 

♦ DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 



INPUTS: 



OUTPUTS: 



SP - POINTS TO THE PC WHERE THE TRAP OCCUREO. 

ADRPTR - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR. 

TP4FLG - 004 TRAP FLAGS. 

TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED, 



CALLING SEQUENCE: 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 



COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE, 

SUBORDINATE ROUTINES CALLED: NONE. 



TP4RTN:; CMP 
BEQ 
JMP 



152630 2$ J 



RTI 



(SP).<>AORPTR 

2$ 

STP4VEC 

0eiTl5,TP4KLG 



iCOMPARE EXPECTED ADR AGAINST TRAP RET PC. 

;IF THEY MATCH. CONTINUE THIS ROUTINE. 

tIF NOT, JUMP TO NORMAL 004 TRAP SERVICE RTN. 

;Sr. I THE 004 TRAP OCCURED FLAG. 

J ALL DONE, GO BACK TO THE TEST. 



K14 



DHU-U f^'UNI 
INTERRUPT ! 



; TST PART4 MACRO M120Q 15-MAR-84 09:48 PAGE li?3 
iERVlCt ROUTINt - TXOMA - 



SEU 179 



6055 
68^4 

tQbb 
6856 
6857 
6858 
6659 
6860 
6861 

686:-: 

686.^ 
6864 
6865 
68o6 
6867 
6868 
686^ 
6870 
6871 
6872 
6875 
6874 
6875 
6876 
6877 
6878 
6879 
6880 
6881 
6882 

6883 

6884 
6885 
6886 
6887 
6888 
6889 
6890 
6891 
6892 
6893 
6894 
6395 
6896 
6897 
6898 
6899 
6900 
6901 
6902 
6903 
6904 
6^05 
6906 
690 (' 
6908 



027426 
027426 
027432 
027436 
027440 



027442 
027446 
027450 
027452 
027456 
027460 
027462 



02 7466 
027474 



004567 155672 
017701 152542 
010100 
000402 



017701. 
100033 
000301 
042701 
010104 
006304 
016405 



152532 



177760 



002364 



026464 005502 003442 

103403 



.SB 
i ♦♦ 
I* 

*■ 
* 

* 
1* 



TTL INTERRUPT SERVICE ROUTINE - TXDMA - 

- DMA TRANSMIT INTERRUPT SERVICE ROUTI;^lf-: - 
THIS ROUTINE EXECUTES IN RESPONSE TO AN INTERRUPT CAUSED BY THE OUT 
TX. ACTION BIT BECOMING ACTIVE. THIS ROUTINE INITIATES THE TX OF A 
NEW DMA BUFFER OF CHARACTERS OR SETS THE TX DONE FLAG FOR THE CORRECT 
LINE IF TX IS COMPLETE ON THAT LINE. 



INPUTS: 



- LABEL OF TABLE OF WORDS EACH WITH A B^'T SET 

- BASE OF i> OF CHARS TO TX/RX TABLE. 



BITTBL 

CNCNTB 

CSRA - CONTAINS THE ADDRESS OF THE OUT C5R. 

DPENDB 

DPLENB 

lESTAT 

TXCNTB 

TXPTRB 



■ BASE OF THE DATA 

- BASE OF THE DATA 

- PRESERVED STATES 

- LABLE AT BASE OF 

- LABEL AT BASE OF 



PATTERN END TABLE (ENTRY PER LINE) 
PATTERN LENGTH TABLE. 
OF THE DUT INTERRUPT ENABLE BITS. 
THE TX CHARACTER COUNTER TABLE. 
THE TX DATA PATTERN POINTERS TABLE 



OUTPUTS: 



TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS SENT. 
TXDONF - TX DONE FLAGS SET FOR LINES WHICH HAVE SENT ALL CHARS. 
TXINTF - TX INT FLAGS CBIT SET IF DMA. HO FOUND SET ON LINE). 



CALLING SEQUENCE: 



comment: 



put the address of the label txdma in the vector 
location. 



SUBORDINATE ROUTINES CALLED: DODMA. 



JSR 



MOV 


aCSRA.Rl 


MOV 


Rl.RO 


BR 


4$ 



TXDMA:: SAVE ;SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SU8RT, 
iREAD THE CONTENTS OF THE DU^ CSR. 
iSAVE INITIAL CONTENTS OF IND.^^DR.REG MELD. 
; BRANCH TO SKIP DOUBL READING UF OUT CSR. 

READ THE CONTENTS OF THE DUT CSR. THIS WILL CLEAR THE TX. ACTION CSR BIT. 

IF TX. ACTION IS NOT SET. EXIT THIS ROUTINE. 

DE]ERMINE THE LINE FOR WHICH THE TX. ACTION WAS SET. 

CALCULATE AN OFFSET FOR USE IN ACCESSING TABLES (2 TIMES THE LINE NUMBER). 

GET THE BIT MAP OF THIS LINE. 



2*: 
4$: 



MOV 
BPL 
SWAi 
BIC 
MOV 
ASL 
MOV 



aCSRA.Rl 

60$ 

Rl 

tfl7776rsRl 

R1,R4 

R4 

BITTBLCR4),R5 



;REAO THE CONTENTS OF THE DUT CSR. 

(EXIT ROUTINE IF TX. ACTION IS CLEAR. 

(CALCULATE THE LINE NUMBER OF THE LINE WHICH IS 

i ASSOCIATED WITH THE TX. ACTION. 

(CALCULATE AN pt-TSET FOR USE IN ACCESSING 

1 LINE COUNTER HuC POINTLR IN TABLES. 

[GET THE BIT MAP OF THIS LINE. 



GE 

IF 



T THE TX CHARACTER COUNTER FOR THIS LINE. 
ALL THE CHARACTERS HAVE BEEN SENT FOR THIS LINE: 
SET THE TX DONE FLAG FOR THIS LINE. 
DON'T SEND A CHAR TO THE LINE t NO MORE. TX. ACTIONS 
LOOP TO CHECK THE TX. ACT ION FOR ANOTHER LINE. 



ON 



LINE) 



CMP TXCNTB(R4).CHCNTB(R4) iCOMPARE i> CHARS StNl AND ry COUNI . 
BLO 6$ iGO TO SEND A CHAR IF NOT ALL CHARS SENT. 



Li 4 
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6909 


027476 


050567 


153000 


6910 


027502 


000757 




6911 








6912 








6913 








6914 








6915 








6916 


027504 


016403 


003202 


6917 


027510 


016402 


003342 


6916 








691^ 








b9.^0 








6921 


027514 


004767 


170172 


69?2 


027520 


103403 




692.^ 








6924 








6925 








6926 


02 7522 


050567 


152536 


6927 


027526 


000402 




6928 








6929 








6950 








6951 








6932 


027530 


060364 


003502 


6933 








6934 








6935 








6936 


027534 


000742 




6937 








6938 


027536 


016701 


152472 


6939 


027542 


042700 


177 760 


6940 


027546 


050001 




6941 


027550 


010177 


152424 


6942 


027554 








027554 


004 736 




6943 


027556 


000002 





BIS 
BR 



R5,TXD0Nr 
2$ 



(SET THIS LINE'S TX DONE FLAG. 
;L00P TO CHECK TX. ACTION AGAIN, 



START THE DHA OE THE NEXT BUFFER (DATA PATTERN) ON THIS LINE. 
GET THE DATA PATTERN LENGTH FOR THIS LINE. 
GET THE START ADDRESS OF THE DATA PATTERN. 



6$ 



MOV DPLENBCR4).R3 
MOV TXPTRBCR4).R2 



(PASS DATA PATTERN LENGTH FOR LINE TO DODMA. 
jPASS THE TX START ADR TO DODMA. 



WRITE DMA PARAMETERS TO THE DUT . 



JSR 
BCS 



PC, DODMA 
8$ 



(SKIP ERROR IF DODMA WAS SUCCESSFUL. 



SET THE PROPER BIT OF THE TX INTERRUPT Fl AGS TO INDICATE THE LINE ERROR. 



BIS 
BR 



R5.TXINTF 
10$ 



J INDICATE THE ERROR. 

J SKIP UPDATING POINTERS AND COUNTERS. 



8$ 



UPDATE THE TX CHARACTER FOR THIS LINE. 
UPDATE THE TX BUFFER POINTER FOR THIS LINE. 

: ADD R3,TXCNTBCR4) jADD THE DATA PAT LENGTH TO THE TX COUNT. 

LOOP TO CHECK THE TX, ACTION BIT FOR ANOTHER LINE. 



10$ 
60$ 



BR 

MOV 
BIC 
BIS 
MOV 
PASS 

RTI 



2$ 

lESTAT.Rl 
0177760, RO 
R0,R1 
Rl.aCSRA 

JSR 



;LOOP BACK TO CHECK TX. ACTION BIT AGAIN. 

;GET THE PRESENT STATES OF TX.IE £ RX.IE BITS. 

iGET SAVED IND.ADR.REG FIELD BITS. 

{COMBINE IND.ADR.REG FIELD BITS WITH IE BITS. 

J RESTORE THE OUT CSR IND.ADR.REG FIELD. 

jRESTORE GPRS. 

PC.fiKSP)* ;RETURN TO PREG05 SUBRT 



SEQ 180 



M14 
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INTERRUPT SERVICE ROUTINE 



TXDM) 



*^EQ 181 



b952 
6953 
6954 
695^ 
6956 
6957 
6958 
6959 
6960 
6961 

6962 
6963 



6964 
6965 
6966 
6967 



0P7560 
027560 

027560 
027560 
027562 



02/564 
0^^/564 
027564 



S8TTL REPORT CODING SECTION 



THE REPORT CODING SECTION CONTAINS THE 

"PRINTS" CAULS THAT GENERATE STATISTICAL REPORTS 



BGNRPT 



L$RPT:: 



000167 
000000 



EXIT 

.EVEN 
ENDRPl 



RPT 



.WORD J5JMP 
.WORD I 10016-2 



104425 



L10016: 



TRAP C$RPT 



DHU-ll FUNC TST PART4 
PROTECIIOH lABLt 



N14 
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6969 

697 7 
69 1 3 
6979 
6980 
6981 
698? 

698 ;5 
6984 

698S 
6986 
6937 
6988 
6989 
69'^0 
6991 



SBTTL PROTECTION TABLE 



f ♦ 



TO PROTECT THE LOAD MEDIA. 



0^7566 
027566 

02756b 
Oc^7570 
0;^7570 

0i?7b74 



i'r/7 7 ,- 
\i nn 
nun 



BGNPROT 



■1 

■1 

1 

ENDPRQT 



LSPROT: : 

:OrFSET INTO P-TAULt FOR CSR ADDRE5'.> 
;OFFSET INTO P-TARLE FOR MASSHUS ADDRESS 
1 OFFSET INTO P- TABLE FOR DRIVE NUMBER 



[ ] 1 



. ) 



DHU-ll f LtNC TST PART^ 
PROTECTION lABLt 

7013 

70 IS 
7016 

;oi .• 

7018 
701'^ 
70.>0 

70:: I 

70.V^ 
"0.\^ 
70.M 
70.^S 
70.'6 
70.^ 7 



70."^ 45 
70*?9 



7050 

7051 
703? 



7035 

7034 
V03S 



7036 

70 3- 
7058 



7039 

7040 
704 1 
704 »J 

704 3 
7044 
704 ^ 
7046 



704/ 
7048 

704 f) 
70S0 
70M 



0<':S74 

or7'-.74 

o.?;5;4 

02 7574 
0? ?600 
0?760.^ 
0?760."^ 

O1.V6O4 
0^7604 

0.^7610 

0?76ir 

0.*7614 
02 7614 
Oc?76PO 
0*J76cV 
0?/62? 

0.V6^4 
O.^ 76?4 
CJ7650 
0.V6 3? 
02 7b5c^ 
0.^/654 
0*.>7640 
0.*/640 
0^7640 



0.*/64.> 

0.'7646 
0.-' 7^ SO 
Oc^765^ 
0.V6S6 
0^766? 
0«:'/66^ 

o?/trp 



ol^7oo 

10444 7 
103416 



012700 
10444 7 

1055S6 



012700 
10444 7 

1055S5 



012700 
10444 7 

105161 
000167 



104433 



012 700 
104462 
OlOOOl 
012167 
012167 
01216 7 
012U>7 

001004 
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000040 



000057 



000036 



OO0S4O 



000114 



152412 
152410 

152406 
152404 
IS2400 



.SBTTL INUIAIT/F SfCTION 
1 • • 



I 



THIS SECTION CONTAINS TMf COOF JHICH IS Pf RFORMEO AT IMF Db'GINNING Qf 
EACH PASS Oft AFTFR A CONTINUF COMMAND. 
THIS CODE PERFORMS THE FQU 0UTN(1 ACTIONS; 

MOVES THE INFORMATION HUD IN THt HARDWARE P lARLF INTO THE U.OHAl 
DATA AREA. 



1* 
I* 
I* 
I* 
I* 
I* 
»♦ 



I ' 



BGNINIT 



iStE IE PROGRAM JUST STARTED. HR U YfcS 
READEE OE E.ST ART 



LJINIT: 



BCOMPLETE 



NEWS T A 



iSEE IF PROGRAM JUST RESTARTED. RR IE YES 
REAOEF dEF, RESTART 



BCOMPl E TE 



NEWRE 



iSEE IF THIS IS A NEW PASS, BR IE TES 
REAOEF OEF.NEW 



BCOMPLETE 



NEWPAS 



I SEE IF PROGRAM WAS JUST CUNTINUFD 
READEF OEF. CONTINUE 



NEWSTA: 



I 



BNCOMPlETt 
JMP END IT 

BRESFT 



GETPRM 



MOV «EF.S^A^JT.RO 
TRAP CJREFG 

BCS NEWSTA 



MOV ^.F. RESTART, RO 
TRAP CiRFFG 

BCS NEWRES 



MOV ^F.NEW.RO 
TRAP C»RE^ t. 

BCS NEWPAS 



MOV oE» .CONTINl^E .RO 
TRAP CIHE*-G 

HCC uE TPRM 



iRESET THE BUS TO PREVENT ll L EGAl INTERRiiPTs, 

TRAP CJHESET 



i SET UP KIR I XHi TiHfr Cl UCK INTERRUPTS. 



I 



Cl OCt< I .Ml 



00006J 



MOV 


(Ml ). .Cl "CSH 


MOV 


tRl ). .Ct KHRl 


MOV 


(Rl )'.Cl.KvtC 


Ml IV 


I Wl). .Cl HHRt' 


CMP 


ClKHR^t^'JO* 


UNL 


2i 



I GET THE CLOCK PARAMETERS. 

MOV 
TRi\P 
MOV 
(STORE Cl OCK CSH ADOWESS. 
iSTtWE Cl OCK HUS Rf INT L f vK 
iSfORF CLOCK INTlRRLiP! VFCTOR. 
iSTC'^t CLOCK FRtQLlNO . 
iTt'.T fOP 50H/ I LN( fRlUL*NCt, 
iURANCH if CtUCK iS NUT SOH*** 



I ,W0 

CJCi C's 
RO,Rl 



CI 



DHL' U ^ LfNC I SI vmiA 



VOSJ 
70S4 



7060 



0^; 

OiV 

or/ 
o.^* 

OcV 

0^: 

OcV 
0^7 
02/ 
O.V 

0?; 

0C7 



TOc^l 

706 5 
7064 
70t.S 
7066 
7067 
7068 
706^ 

70 ;o 

7071 
7072 
7075 
7074 
707S 
70 76 

707 7 
7078 
70 7^ 
7060 
7081 
7082 
7085 
7084 
708S 
7086 

708 7 
7088 
7089 
70^ 
70^1 
7092 
7095 
7094 
709S 
7096 

709 T 

7u98 
7099 
7 1 00 

noi 



702 
710 
712 
U'O 
720 
724 
750 
754 
740 
742 
746 
7b2 
7S4 
760 
760 
764 



012 76 7 
000405 
01276 7 

012/46 
012/46 
016746 
012746 
104457 
062/06 
016 700 
006 ^00 
010067 

012 700 
104441 



02 7 766 
027774 



050002 
050006 
050014 
050020 
050024 
050050 
050056 
050040 
030044 



016767 
012767 



005067 
012767 
012700 
016701 
004 767 

016767 
105405 
00506 7 
000402 
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000024 

000021 

000500 
02 7146 
l'i2540 
000005 

0000 10 
1^2524 

1S2526 

000240 



150012 
027404 



152246 
OOOIOO 
002266 
152244 
167226 
152222 

152232 



050046 004767 166020 



030052 
050060 
030066 
0300 72 
050076 
050102 
050106 
050112 
050116 
0501?2 
050150 
050152 
050140 
030144 



016767 
012767 
00506 7 
00506 7 
012700 
016701 
005067 
00506 7 
004 76 7 
016767 
105005 
012767 
00506 7 

00016/ 



14 7 726 
027404 
152162 
1521/0 
002266 
152206 
152:^06 
152?04 
16 7154 
152150 

00000 I 
I5?0 7f. 

000006 



iri2400 
1525 70 



152262 
150002 



152252 



14 7746 



152176 
14771b 



14 76S4 
152160 



2»: 

4(! 



MOV 020. , MS TICK 

HR 41 

MOV 017. .MSTICK 

SfcTVbC CLKVhC , ftCLKlNT . 0PRI06 



I INDICATE 20MS PfcR CLOCK TICK. 

lINDICATt 1/ MS PtR CLOCK TIC*^. 
lINITIALUE CLOCK INTERRlJPT VfcCTOR 



MOV 


CLKHR/.RO 


AM 


RO 


MOV 


RO.BCOUNT 


5ETPRI 


0PRI05 



I ENABLE THE LINE 
i IS ACCESSABLE. 
; FIRST SET UP 

I • 

MOV 4 



, INITIALIZE THE BREAK 

I TO CAUSE A BREAK 

I FVERY 2 Sf-CONDS. 

I ALLOW CLOCK INTERRUPTS 



TIMt: CLOCK (UTC> CHECKING TO MAKE SDRE THAT THt CSR 
TO CATCH ANV 004 TRAPS UHICH OCCUR: 



MOV 


dPRI06.-(^Pj 


MOV 


OCLKIN^ CiP) 


MOV 


CLKVtC. (SP) 


MOV 


05. ('.P) 


TRAP 


CJSVf c 


ADO 


010. SP 


COUNT 




S DISABLE 


OTHER'i. 


MOV 


OPRIOS.RO 


TRAP 


C*SPRI 



TP4VEC 



MOV 



0TP4RTN.4 



iSAVE THE EXISTING 004 TRAP VECTOR. 
iSFT 004 TRAP VFCTO-*^ TO OUR SERVICE 



RTN ADR. 



I 



ENABLE I TC CHECKING FOR 004 TRAP IN CASfc CSR IS NOT THERE. 



CLR TP4FLG 

MOV #eiT6.UOR01 

MOV •WOROI.RO 

MOV CLKCSR.Rl 

JSR PC, CK TRAP 

MOV TP4VEC,4 

BCS 6» 

CLR CLKHRZ 

BR B» 



iCLEAR THE 004 TRAP FLAG. 

iSET UP TO SET BIT6 Of THE LTC CSR. 

I SET UP WOROl AS THE. CKTRAP MU«l SOURCE. 

(SET UP LTC CSR AS DESTINATIOi FOR CKTRAP MOVE 

(MOVE ANO CHECK FQR TRAP, 

iRESTORE THt NORMAL 004 TRAP VLlIUR. 

lIF NO TRAP. LTC IS THERE SO CONTINUE. 

iClEAR LTC FREQUENCE WORD TO INDICATE NO I TC. 

iBYPASS TK: FOLLOWING CALIBRATION PROCEDURES. 



( CALlBRATr THE DEI At ROUTINE' MILl I -SECOND DELAt COUNT VALUE. 

6»: JSR PC.CAIMSI 

I CHECK FOR MEMMiX^r MANAGEMENT PRESENT ON THIS MACHINE. 

I IF MEM MGT IS PUf iFNT. DISABLE IT. 

I 

81: 



10*1 



MOV 

MOV 
CLR 
CLR 
MOV 
MOV 
ClR 
Ct R 
JSR 
MOV 

ncc 

MOV 
JMP 



4. rP4vf c 

OTP4RTN.4 

TP4» I [, 

UORDl 

OWORD I . RO 

MMSHO.Hl 

MMPRtS 

MMFNAB 

PC. CKTRAP 

TP4VtC.4 

101 

Ol.MHPRES 

PASCNT 

NtWPAia 



(SAVE THE EXISTING 004 TRAP VECTOR. 

I SET 004 TRAP VECTOR TO OUR SERVICE RTN rtLlR . 

iCLEAfl THE 0O4 TRAP HAG. 

iPREPARE TO CLEAR THE MEM MGT SRO RtGIMtH. 

(SELECT CLEARED WORD Aj CKTRAP RTN SOLiRCt . 

(SELECT MEM MGT SRO REGISTER AS DESriNATlON. 

(INDICATE NO ME.M MGT PRESENT IN CASE IT I SN r 

(INDICATE MEM liGT IS NOT ENABLED. 

(CLEAR THE MEM MC T SRO REG AND CHt C^ ►OR TM.\;' 

(RESTORE THE NORMAL 004 TRAP VECTOR. 

(SKIP INDICATING MEM MGT PRESENT U it I ^N !. 

(INDICATE THAT MEM M(,T IS PRESENT. 

(CtR COLWMTER USED IN REPORTWi RQM VfRMON ^^ 

iSKIf^ AROUND THt SUii REiiET^ IT'S UtEN DUNL , 



DVj 



m^\k^^'^^,mlm'''' 



7104 
71 OS 
7lOt» 

7lOrt 
710^ 

7 no 
''111 

7UJ 
7 1 1 5 
7114 
7 US 
711c. 

7 1 1 ; 

7118 
71 W 

7un 

7122 



7U-5 

71^4 

71r^S 

■' ! ?b 

71c^8 
71?9 

vi:5o 

71^1 
715^ 
715? 
7154 
715^ 
715^ 
715/ 
7158 
7159 
7140 
7141 
714^ 
714^ 
7144 
714S 
7146 
714/ 
7148 
Vl4'* 
7 1 SO 
VIM 
VIS.' 

7:£»3 



0501SO 

0501:^.0 

0501S,> 

0501Sb 
0301bb 



050164 

0501 ;o 

05017c: 



0501 f^^ 
050176 
050P0c^ 
050?10 

050212 
030212 
050216 
030220 
050222 
050222 
030224 



050226 
05025? 
050254 
050240 
050244 
050250 
030254 



050260 
050264 
050266 
050270 
050274 
050500 
050502 
050 504 
050506 
050310 



030512 
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11)2064 
17/ 77V 

1^2052 
152044 



1^1774 
lbl770 



151760 



104455 
005067 



012/67 



O0S26 7 
001002 
005367 



005267 
026/6 7 
002362 



016 700 
104442 
OlOOOl 

105401 
000764 



012167 
012102 
010267 
06270? 
01026 7 
012167 
111167 



016701 
005201 
005201 
012705 
012702 
010122 
005c>0l 
005201 
005505 
001573 



012 '/OC 002S12 



151746 

151726 
000004 
151720 
151716 
151714 



151714 



00000 / 
002202 



152012 



151602 



NFWRHS; HR^SHT 
CLR 

NFWPASi 

MOV 



PASCNT 



l.L)NITN 



iRF.SF.r THF nu5 TO PRFVENT XMEGAL INTFRRUPTS. 

TRAP CiRF^.ET 
I CLR COUNTtR USf;D IN REPORTING ROM VERSION 0. 



iRESLT LOGICAL DEVICE TO -1 



I INCREMENT iMf PASS COUNTER. CORRECT FOR ANY OVERFLOW. 

I THIS COUNTER IS USED IN THE ROM VERSION TEST. 

I - 

INC PA5CNT (INCREMENT THE PASS COUNTER. 

BNE GETPHH (BRANCH If WE HAVE NOT rET! UVERELOWED. 

DEC PASCNT jSET PASS COUNT TO 177777 OCTAL. 

1 GET THE HARDWARE PARAMETERS KQR THIS UNIT. 
GETPRMj 

INC UNITN 

CMP UNITN, LiUNlT 



BGE 



NEWPA' 



(INCREMENT LOGICAL DEVICE NUMBER 
(SEE If MAXIMUM UNIT NO. EXCEEDED 
I BR IK >ES 



GPHARD UNITN, Rl 

BCOMPLETE 

BR GETPHM 



30$ 



iGET P- TABLE POINTER INTO Rl 

jRR IE DEVICE AVAILABLE 
iSKIP THIS DEVICE 



MOV 
TRAP 

MOV 

UCS 



UNITN, RO 

CfGPHRD 

RO.Rl 

30$ 



30$: 



I 



HARDWARE PARAMETER MOVING CODE 



MOV (R1)..CSRA 

MOV (R1)»,R2 

MOV R2.RXVECA 

ADO 04. R2 

MOV R2,IXVECA 

MOV (R1)..ACTLNS 

MOVB (Rn^i.OPBCK 



iSTORE DHU 11 CSR ADDRESS IN OEV .REG. ADDRESS TABLE 
jGET THE RX INTERRUPT VECTOR ADDRESS. 



(STORE RX INT 
(CALCU-ATE TX 
iSTORE TX INT 
(STORf DHU-11 
(STORE DHU 11 



VECTOR 

INTERRUPT VECTOR ADDRESS 

VECTOR ADDRESS. 

ACTIVE I INf BIT MAP 

LOOPBACK MODE 



I ♦ 
( 
1 
i ' 



CALCU TATE OtVlCt REGISTER ADDRESSES , AND PUT 
DEVICE REGISTER ADDRESS TABLE. 



COPT CSR ADDRESS 



THEM IN THE 



MOV 


CSRA.Rl 


INC 


Rl 


INC 


Rl 


MOV 


; , w ^ 


MOV 


t>H\\\.^ A,Ht 


MUV 


Rl .(H2>. 


INC 


Rl 


INC 


Rl 


DK 


R5 


BNE 


12$ 



INCREMENT CSR ADDRESS 

COPt Bt 2. 
SET Uf> REGISTER COUNT 

GET LOCATION WHERE RBL» ADDRESS GOES IN TABLE 
1.'$! MUV R1.(H2>. (STORE REGISTER ADDRESS IN TABl t 

INCMfMENT REGl'jTfR AODRt SS 

Hr 2, FOR THE Nl X T DEVICE REGISTER » 
OKftEMENl REGISTER COUNT 
I OOP IE NOT DONE 

INITIALISE THE BMP CODF QUEUE. 

MOV «HMPCQB,RO jGt T THE START ADDRESS Of Thfc QUEUE. 



[:Vj 



DHU 11 i LfNC TSl f-^ART4 
INITimi/t- SF.CTION 
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71M 


050516 


012701 


00? 71.^ 


71SS 


05053^ 


aoo67 


I5ai6^ 


7156 


050?=>- 


05020 




7 IS.' 


050550 


O.'0001 




71*^t\ 
7 1 S-^ 
71r.O 


05053a 


10377b 










7161 








716c^ 








716? 


050554 


03c-^767 


0000c?0 lM6c^0 


7164 


050 54 J 


001416 




716S 


050544 


OP67i?7 


I5l44r> 000001 


7166 


05035^ 


0034 If? 




7167 


050554 








O505S4 


016746 


151616 




050560 


01^:746 


00755S 




050364 


01.^746 


00000? 




503 70 


010600 






05057.^ 


1044W 






0505 .'4 


062706 


000006 


7168 


050400 






7169 








7 1 70 


030400 






71/1 








7 1 7,-^ 








7175 








7174 


050400 








050400 


OU^/00 


000340 




050404 


104441 




7i;rj 








7176 


050406 
050406 








050406 


104411 




7 1 / ; 








7 1 7y 




000000 





MOV OBMPCQfc .Rl 

MOV RO.BMPCQP 

14$: CL.R (RO)* 

CMP RO.Rl 

Bl.O 14i 



iGF.T THE END ADDRESS OF THE QUEUE. 

I SET THE POINTER TO THE START OF THE QUEUE 

; CLEAR OUT THE CONTENTS OE THE QUEUE. 

I CHECK IF ENO OF QUEUE HAS BEEN REACHED. 

ILOOP IF NOT AIL DONE. 



I REPORT THE UNIT NUMBER IF THE SOFTWARE P TABLE QUESTION WAS ANSUERfD ^ES. 
1 AND THE MAXIMUM UNIT NUMBER IS GREATER THAN I. 



1 - 



BIT 


^IT4. OPTION 


BtQ 


16$ 


CMP 


LJUNIT.^l 


DIE 


16* 


PRINTF 


OMFUNIT.UNITN 



I CHECK IF THE QUESTION WAS ANSWERED rES. 

I'iKIP REPORTING UNIT NUMBER U IT IS DISABLED. 

i CHECK MAXIMUM NUMBER OF IJNITS SELECTED. 

iDO NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 

I REPORT UNIT NUMBER. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



16* 



UNf fN, -CSP) 
ftMFUNIT, -(SP) 

or, COP) 

SP.RO 
CiPNTF 
06, SP 



ENDTT: 

1 SET THE PROCESSOR PRIORITY TO DISABLE All INTERRUPTS. 

SETPRI 0PRI07 jSET PROCESSOR PRIORITY TO /. 

MOV 
TRAP 



0PR10.\R0 
C*SPHI 



hNDINlT 



TNLW 



L100?0: 







TRAP CJINIT 

J INITIAL UL THE ASSEMBLER TEST NUMBER VARIABLE. 



lib 



OHU U fUNC TST PAMT4 
INlTIAl I/E SfcCTION 
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^FQ 1«7 



".■181 
7UH? 

Via; 
vit^a 

Vi91 

"19.^ 

? 1 ^4 
Vl^'. 

•:^>; 

7.^0 ■ 
7208 



l1i^1iU^^H^Uii^1^1i1i1i^^^^^<li1i^iii^Hiiit1i1i1ifi^1i1i1iUfl1i^^1iH^1i9t1i4H^1i1iUUHfi1iiiHf^fi9i1iU4H^^^ 



050410 
030410 



o?;o4io 

050410 
030410 



J^VTD.ATD 



.SBTTL AUTODRUP StCTlON 



I THIS COOF. IS l.XtCUTED IMMEDIATtLT AFTER THE 

t THE "ADR" FLAG WAS SET. THE UNIT(S) UNDER 

t SEE IF THE1 WILL RESPOND. THOSE THAT DON'T 

1 DROPPED FROM TESTING. 



BGNAUTO 



INITIALIZE CODt IF 
EST ARE CHECKED TO 
ARE IMMEDIATELY 



L$AUTO 



ENDAUTO 



104461 



LlOOc?! 



RAP 



C$AUTO 



G15 



DHU 11 HINC Tbl PrtRT4 
AUTOORLiP SECTION 


7^.lf 






^n« 






7:u» 






7.^.^0 






V.\^l 










T 1 » 1 






■ i , t. w. 






Z."^.^? 






v.\:'4 






7.^.^S 






7^26 


05041.^ 
03041;^ 




7^?/7 






7c: 56 






7,-\'i/- 


0X041,-^ 


005 76/ 


V.?5ft 


0,^0416 


001401 


7?S9 


0304^0 






O3O4?0 


104435 


7r-?40 


0304i?? 




7241 


0304r.^ 






0504cV 


1044 5? 




030424 


000002 


724^ 






7?54 






7c'bS 






7.^5^ 






7357 


0304,0^ 
03 04. '6 






050426 


104412 
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SPQ 188 



.SBTTl CLt.ANUP CODINo SECTION 



iHt CLEANUP CODING 
AFTER THE HARDWARE 



SECTION CONTAINS THE COOING THAT 
TESTS HAVE BEEN PERFORMED. 



IS PERFORMED 



1 * - 



151602 



2$; 



BGNCL.N 



TST 
BEQ 
RRESf-.T 



EXIT 

.EVEN 
ENDCLN 



CTRLCF 



CUN 



(DID WE 
tCTRL'C 



GET HERE BY 
FROM TFST? 



l.SCl.EAN 



CTRL -C FROM 
NO. SKIP BU' 



TEST? 
RFSET 



jYES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 

TRAP C$RESET 



TRAP 
.WORD 



CJFXTT 
L 10022 - 



L 10022: 



TRAP 



CJCLEAN 



8rk'A^LV^1^8Slte^.ic^?f3N 



HILj 
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'"^EQ 1^9 



7.>>f. 










7^67 










7.^.6S 










7i?69 










7.^70 










7.-^ 71 










727c: 










7.^'5 










7^74 










7c>7r> 


0504 ?0 
030450 








7^76 










7^7 7 










7,':78 










7c^;9 










7c:80 










7^81 










':^&^ 










7283 


030450 
050430 


010046 








05043:,^ 


012746 


050454 






050456 


012746 


000002 






030442 


010600 








0304:^4 


104417 








030446 


062 706 


000006 




7284 


050452 


000427 






7P8'. 










y?.Q6 


0504b4 


045 


101 


040 




05045 7 


125 


116 


111 




030462 


124 


045 


104 




0304(^5 


0^6 


045 


101 




0504 70 


040 


104 


122 




0504 73 


117 


120 


120 




0504 76 


105 


104 


040 




050501 


106 


122 


lU 




050504 


115 


040 


106 




05050^ 


125 


122 


124 




050512 


110 


105 


122 




030515 


040 


124 


105 




050S2O 


125 


124 


111 




050525 


116 


107 


056 




050526 


045 


116 


000 


7.^8 / 










/c^8H 


030552 








7,-589 










v;?90 


050552 
050552 
030534 


00016/ 
000000 






7,->91 










7,>V 










V293 


050556 
0305 56 
030:>36 


I044t»3 







.SBTTL DROP UNIT SECTION 



; ► ♦ 



THE DROP 'JN XT SECTION CONTAINS THE COOING THAT CAUSES A DEVICE 
TO NO LONGER BE TESTED. 



FJGNUU 



L.JDU: : 



I INSERT DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 

I A "DROP" COMMAND OR A "DODU" MACRO EXECUTION. THE PURPOSE 

; Of THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING; AFTER A 

: UNIT HAS BEEN DROPPED. THIS SECTION IS OPTIONAL. 

PRINTT flDROP.RO jREPORT UNIT THAT HAS BEEN DROPPED. 

MOV RO. -CSP) 

MOV 'JDROP. (SP) 

MOV 02. (SP) 

MOV SP.RO 

TRAP CJPNir 

ADD «6,SP 



BR 



FDROP 



(RRANCH AROUND THf- MESSAGE. 



DROP: .ASCli?/»(A UNlTiiD6*<A DROPPED FROM KURTHER TESTING>N/ 



EDROP; 



.EVEN 



EXIT nu 



ENDDU 



LX0025i 



.WORD M MP 
.WORD 1.10025-2- , 



TRAP C$U^' 



lib 



DHUll ruNC TSr PART4 
DROP UNIT SF.CTION 



7.^sS 

7?^ : 

7300 
7.^01 
7?0.^ 
7^0^ 
7504 
7 50';. 
7 506 
750 7 
750*^ 
750^ 
7510 
75U 
75U? 
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•^EQ 190 



050:^40 
050540 



75:5 
7514 
7 51'^ 
7516 
7517 
7518 
751'^ 
75:^0 
75^1 



75.^^ 
7 5.M 
75.-^^ 
7 5i^6 



75^7 



050S40 
050^40 
050542 



050S44 
50^44 
030b44 



000 If./ 
000000 



I KVTD.ADD 

.SBTTL ADD UNIT StCTION 

; THt ADDUNIT srCTION CONTAINS ANY CODE XHVl PROGRAMMtP WlbHf S 
i TO BE txeXUTtO IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
: TO THE TEST CYCLE. 



BGNAU 



L. :a'j 



INSERT ADD CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
AN "ADD" COMMAND. THE PURPOSE 0^ THIS CODE IS TO DO ANY 
HOUSEKEEPING THAT HAY BE NECFSSART AFTER A UNIT HAS BEEN ADDED. 
THIS SECTION IS OPTIONAL, 



EXIT 

.EVEN 
tNDAU 



AU 



.WORD 
.WORD 



JJJMP 
L 10024 ^2 



104452 



10024! 



TRAP 



CiAU 



J15 



OHLMl l-UNC TST 
HARDWARt TtST 

7? 50 
7?31 
755? 
7555 
7554 
755^^ 
7536 
7557 
7338 
7539 
7340 
7341 
734^ 
7345 



7544 

734r> 

7346 

7347 

7348 

754-^ 

7350 

7351 

75 V 

735;; 

7354 

7555 

73r.6 

7557 

7358 

7359 

7560 

7561 

756? 

7565 

7564 

7365 

7566 

7367 

736« 

7569 

75 ?0 

73 71 

757? 

7375 

7 5/4 

75 75 

75/6 

7577 

73/8 

7 5 79 

7580 

7581 

758? 

738 3 

7384 



050546 
030546 

030546 
030554 

05056? 
050570 
030576 



050604 
05061? 
030620 



0306?? 
0306?6 
03063? 
050636 
050640 
050644 
03065? 
030654 
030660 
030664 
050666 
030672 



050674 
030700 
030706 
05071? 
030 716 
0307?? 
0507?4 
050/30 
050/3? 



PART4 



000001 
01?767 
01? 76 7 
01?767 
01?767 
012767 



016767 
01?767 
005005 



016700 
012701 
004/67 
10340? 
O5?705 
042767 
010100 
016701 
004 767 
103403 
052705 
0004 ^4 



01270? 
016767 
016 700 
Ol?701 
004 76 7 
10340? 
05? /05 
OICIOO 
016701 
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'■.EQ 191 



000001 
177777 
000145 
010047 
013500 



147174 
027404 



^-BTTL. 

f 



HARDWARE TEST 



ADRA - 



REGISTER ADDRESS TEST 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPOND TO THE PROPf.R 
UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED. If THE DHUU DOES NOT RESPOND 
TO THE ACCESS ATTEMPTS CIE THE DHUll IS AT THE WRONG ADDRESS. F- OH EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE ONLY. 



151504 

151436 
154526 
15452? 
154516 



151444 
147164 



BGNTST 

TNUM -- TNUM * 1 

MOV OTNUM.TSTNUM 

MOV ^ l.CTRLCF 

MOV <>101. .ERRNBR 

MOV *EM0103,ERRMSG 

MOV ^EROIOI.ERRBLK 



Tl: : 
TIME 



iINCREMENI THE ASSEMBLY 
iSET UP THE TEST NUMBER. 
(INDICATE THAT WE ARE IN A 
jSET THE TEST ERROR NUMBER 



TEST COUNTER. 
CD 
TEST. 

IN THE TABl.E. 



J SET UP THE TEST FAILURE MESSAGE 
; SET -UP THE ERROR ROUTINE IN THE 



IN THE TABLE 
ERROR TABLE. 



I ♦ 



SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 



I ■ 



I ♦ 



MOV 


4,TP4VEC 


MOV 


OTP4RTN.4 


CLR 


R5 



I SAVE THE EXISTING 004 TRAP VF.CTOR. 
I SET 004 TRAP VECTOR TO OUR SERVICE 
I CLEAR THE ERROR FLAGS. 



RTN ADR. 



; HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE. 

i FIRST TtST THE CSR AND SET THE IND.AOR.REG (I./\.R) FIELD. 



15135? 
031020 
1664?0 

100001 

000017 000146 

151320 
166372 

100002 



000010 

151? 74 000110 

000104 

031020 

166334 

100001 
000060 



4$: 



MOV 
MOV 

JSR 

BCS 
BIS 
BIC 
MOV 
MOV 

JSR 

BCS 
BIS 

BR 



CSRA.RO 
05?t.Rl 
PC.CKTRAP 
4i 

0100001, R5 
017. 5?$ 
Rl.RO 
CSRA.Rl 
PC.CKTRAP 
b$ 

0100002. R5 
40J 



(SET UP CSR AS THE CKTRAP MOVE SOURCE. 

J SET Uf DESTINATION I OCATION FOR CKTRAP MOVE. 

J MOVE AND CHECK FOR TRttP . 

ilF NO TRAP, BYPASS ERROR. 

iSET FATAL READ ERROR FLAGS. 

t CLEAR THE I.A.R FIELD OK THE CSR DATA. 

;USE OLD DESTINATION FOR SOURCE OF CKIRAP MOVE 

;SET UP CSR AG THE CKTRAP MOVE DESTINATION. 

sMOVE AND CHECK FOR TRAP. 

(IE NO TRAP, BYPASS ERROR. 

:Ser FATAL WRITE ERROR FLAGS. 

lEXlT AND REPORT FATAL ERROR. 



NOW, WE TEST EACH REGISTER FOR THIS LINE 



6* : 
8(: 

105: 



MOV 08.. R? 

MOV CSRA.50J 

MOV 50»,R0 

MOV 05?$.R1 

JSR E^C, CKTRAP 

BCS 10$ 

UIS OlOOOOl^Rb 

MOV Rl.RO 

MOV bO$,Ri 



iINIT REGISTER COUNTER TO 8. 

ilNITIAl.IiTE THE REGISTER POINTER. 

(SET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE 

;SLT UP LOCAL STORAGE AS THE DES f OR CKTRAP. 

jPER.'^ORM THE MOVE, CHECK FOR TRAP. 

J TK NO TRAP. BYPASS ^H^: SETTING OF t-RROR i'l AG^S 

iSEI FATAL READ ERROR KIAGS. 

(USE OLD DESI AS SRC ^ OH CKIRAP MUVf , 

iSET UP REGISTER AS THE DESl E'OH CKIKAP NOVL . 



Kl^ 



DHU 11 KUNC TST 


PART4 


MACRO r 
- AORA 


HARDWARE 


Tf-:>;T 




7585 


050 756 


004/67 


166314 


7586 


05074^* 


10540? 




7537 


050744 


052705 


10000? 


7588 


050750 


005?67 


000O4? 


7389 


050754 


005?67 


000036 


7590 


05076C 


00550? 




7591 


030762 


001551 




759.> 








759? 








7594 








7595 








7596 








7597 








7598 


050764 


016767 


151?66 


7 599 


0507 7? 


OOS/05 




7400 


0507 74 


100012 




7401 








740? 








7A05 








7404 


050i'/6 








030776 


104460 




74Cr» 








7406 








7407 


051000 








051000 


016700 


15117? 




051004 


104451 




7408 


051006 


005067 


151206 


7409 


05101? 








05101? 


104444 




7410 


051014 


00040? 




7411 








741,> 








7415 


051016 


000000 




7414 


0310?0 


000000 




74 IS 








7416 








7417 


0510?? 


005067 


151172 


741{J 


0510?6 
0^10?6 








OJlOiib 


104401 
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SEQ 192 



12$; 



JSR 


PC.CKTRAP 


BCS 


12$ 


BIS 


^100002. R5 


INC 


50$ 


INC 


50$ 


DtC 


R? 


BNE 


8$ 



iPERfORM THE MOVE. CHECK f OR TRAP. 

I IF NO TRAP, BYPASS THE St T TING OF ERROR FLAGS 

;SET FATAL WRITE ERROR FLAGS. 

t INCREMENT THE REGISTER 

t POINTER BY ?. 

iCOUNT THE REGISTER. 

iLGOP TO TEST THE NEXT REGISTER ADDRESS. 



DONE CHECKING DEVICE REGISTER ADDRESSES. 
REPORT ANY ERRORS AND EXIT. 



147012 40$: 



MOV 


TP4VEC.4 


TST 


RS 


BPL 


60$ 



; RESTORE THE NORMAl 004 TRAP VECTOR. 
; CHECK THE ERROR ^LAG'_3. 
iEXIT ROUTINE IF NO ERRORS. 



REPORT "DEVICE REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



DODU 



CLR 
DOCLN 

BR 



UNITN 

CTRLCF 

60$ 



jDROP THIS UNIT FROM FUTHER TESTING. 

MOV 
TRAP 

[INDICATE NO CTRL C ABORT FROM TEST, 

: ABORT THIS SUB PASS. 

TRAP 

; 



C$ERRUR 



UNITN.RO 
C$DODU 



C$DCLN 



;A*«**«4l*«*4*«*«* LOCAL STORAGE , *****A****4***4l**\**«*«*4****4******A**A* 

^0$: .WORD {STORAGE FOR THE SOURCE. OR DEST OF THE CKTRAP MOVE. 

5?$: .WORD iSlORAGE FOR 1 Ht SOLtfiCE OR DEST Of- THE CKTRAP MQVE . 



60$; CLR CTRLCF 
ENOTST 



iXNUXCATE THAT WE ARE NOT WITHIN A TEST, 

L 10025; 

TRAP C$ETST 



OHU U ^l^'NC 1ST PARTfl 
HARDWARE TtST 



Li^ 



J 
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SEQ 193 



74.n 
74.^ri 

74. -^b 
74^7 
74,>y 
74^0 
74 50 
74 51 
74 5? 
74 55 
74 54 
74 55 
7456 

7437 



74 58 
7439 
7440 
7441 
744:; 
7443 
7444 
7445 
7446 
744 7 



7448 
7449 
7450 



7451 
745? 
7453 
7454 
7455 
7456 
7457 
7458 
7459 
7460 
7461 
746^ 
7465 
7464 
7465 
74 o6 
7467 



031050 
051050 
051050 
051050 
031034 

031036 



031044 
031052 
051054 
051054 
031056 
051060 
031060 
03106? 
031062 
031064 
051064 
031066 

051070 
031076 
031104 
031112 
031120 



051124 
051130 
031132 



012700 
104441 
00000? 
012767 



126^2/ 
00140? 

104432 
000212 

104450 

105402 

104432 
000202 

012767 
012767 
012767 
012767 
005067 



004/6/ 
10540? 
000167 



000240 



000002 151214 



151124 000005 



.SB'"TL HAROWARt. TEST - KBtCHO - 

- KEYBOARD ECHO TESV - 
THIS IS A TEST WHICH PUTS UARTS FOR THE ACTIVE LINES INTO REMOTE 
LOOPBACK MODE. THE ACTIVE LINE UARTS ARE SET UP WITH A BAUDRATE 
WHICH IS SPECiriED BY THE OPERATOR. THIS TEST SETS UP THE LINES 
FOR: 1 STOP BIT. NO PARITY AND 8 BITS/CHARACTER. 
THE TEST EXECUTES INDEFINITELY UNTIL TERMINATED BY THE OPERATOR. 

THIS TEST CAN BE USED FOR LOOPING BACK TERMINAL KEYBOARD INPUT ONTO 
A TERMINAL CRT OR IT CAN BE USED AS A GENERAL LOOPBACK METHOD FOR 
TESTING COMMUNICATIONS LINKS TO THE DUT FROM THE OTHER END OF THE 
CHANNEL. DTR AND RTS ARE SET ON THE SELECTED LINES DURING THIS 
TEST TO ALLOW THE TESTING OF MODEM LINKS. 

BGNTST 

T2:: 
SETPRl 0PRI05 J ALLOW LTC INTERRUPTS. 

MOV .'>PRI05,R0 
TRAP C$SPRI 
TNUM -- TNUM ♦ 1 j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV ^TNUM.TSTNUM iSET UP THE TEST NUMBER. (94) 

VERIFY THAT THE TEST SHOULD BE PERFORMED. MUST HAVE THE FOLLOWING: 
KEYBOARD ECHO LOOPBACK SELECTED. 
MANUAL INTERVENTION ALLOWED. 

J TEST THE LOOPBACK TYPE INDICATOR. 

jKBD ECHO LPBCK SELECTED? YES, CONTINUE TEST. 

iNO, ABORT THE TEST. 

TRAP C$EXIT 
.WORD L 100.^6 . 
2$: MANUAL j CHECK FOR MANUAL INTERVENTION ALLOWED. 

TRAP OMANI 

iMANUAl INTERVENTION ALLOWED? YES. DO TEST. 



177777 
000001 
022271 
013022 
151354 



151122 
154210 
154204 
154200 



CMPB 
BEQ 
EXIT 


L0PHCK.V>5 

2i 

TST 


MANUAL 




BCOHPLETE 4$ 


EXIT 


TST 


MOV 
MOV 
MOV 
MOV 
CL R 


l.CTRLCF 
OLERRTtP 
09401 . .FRRNBM 
0EM9401.ERRMSG 
ERSMRF 



jNO, ABORT THE TEST. 



BCS 

TRAP 
. WORD 



4$ 

CJl XIT 
L 10026-. 



166206 
000120 



4$: MOV l.CTRLCF [INDICATE THAT WE ARF IN A TfcST, 

;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
(SET THE FIRST ERROR NUMBER IN FHROR TABLE. 
:SE1 ERROR MESSAGE ADDRESS IN ERRIBL. 
jINlTIALI/E THE -REPORT ERROR SUMMARi " FLAGS. 

RESET THE DU . 10 A KNOWN STATt. REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THF CSR. 
THIS SUfJROUTINE REPORTS ERROR ^^■>>> ^401 <<<^<^ 

;RESET THE DHU U. REPORT ANi ERRORS FOUND. 
(SKIP tXII OF TE^.T U NO FATAl L HROR FOUND. 
(RESET FAILURE, ABORT THIS TEST. 

PRINT THE TEST NAMt . 



JSR 


PC.CLNRST 


UCS 


. •6 


JMP 


60 : 



M15 



HARDWARt TFST 



7468 



746^) 
74 /O 
7471 
74 7P 
74/5 
74 74 
74 Vb 
74 /6 
74/7 
7478 
7479 
7480 
7481 
7482 
7483 
7484 
7485 
7486 
7487 
7488 
7489 
7490 
7491 
749^ 
749?: 
7494 
7495 

7497 
7498 
7499 
7500 



051156 
031136 
03114? 
031146 

05115r"^ 

031154 
051156 



7501 
750;^ 
7505 
7504 
7505 



7!^0t. 
7507 



03116:? 
031166 
031170 
031172 
031174 
031176 
031200 
031202 
051204 
031210 

031214 
031220 

031224 
031230 



031254 

051242 

03124c:' 

051244 
051246 
051250 
051252 
0512S4 
051256 



031256 
031256 
031262 
Cjl26n 
0512/0 
0312/0 
031J70 



PART4 



012746 
012746 
012746 
010600 
104417 
062706 



004 767 
010100 
006501 
006301 
006301 
006501 
050100 
000500 
042700 
052700 

016705 
004767 

012700 
004767 



MACI 



l^cHi 
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015022 
0055^0 
000002 



000006 



PRINTF OEF0503 , ttEM9401 





SEQ 194 


MOV 


V/EM9401, (SP) 


MOV 


.'^EF0503, -CSP) 


MOV 


^>2, -(SP) 


HOV 


SP.RO 


TRAP 


C^PNTF 


ADO 


i>6 . SP 



167140 



SET UP THE OUT UARTS WITH THE PROPER LINE PARAMETERS. 
GET THE DESIRED BAUORATE FROM THE OPERATOR. 
CALCULATE PROPER OUT LPR CONTENTS. 
SET UP THE OUT LPR REGISTERS. 
GET THE PROPER DUT LNCTRL REGISTER CONTENTS. 
SET UP THE DUT LNCTRL REGISTERS. 



012700 
104441 
005067 



104401 



000377 
000030 

150752 
175672 

0U304 
175632 



JSR 


PC.GtTBOR 


MOV 


Rl.RO 


ASL 


Rl 


ASL 


Rl 


ASL 


Rl 


ASL 


Rl 


BIS 


Rl.RO 


SWAB 


RO 


BIC 


0577.ro 


BIS 


030. RO 


MOV 


ACTLNS,P5 


JSR 


PC.WTU'i ;->R 


MOV 


011504, RO 


JSR 


PC.WTWLNC 



jGET DUPLICATE COPIES OF BAUDRATE CODE 
i IN THE UPPER BYTE OF THE NEW 
; LPR CONTENTS. 

iSET UP 1 STOP BIT, NO PARITY, 8 BITS/CHAR 
; IN THE LPR CONTENTS. 

jGET THE ACTIVE LINES BIT MAP. 

iSET UP THE OUT LPR REGISTERS FOR ACTIVE LINES 

I SET UP DTR. RIS. REMOTE LP8K. AND RX ENABLE. 
(SET UP THE DUT LNCTRL REGS FOR ACTIVE LINES. 



0l,V67 000001 150766 

104443 
000404 
002230 
000150 
015437 
000001 



WAIT FOR THE OPERATOR JO TERMINATE THE TEST. 
PROMPT "TYPE <CR> TO TERMINATE THF TFST:" 

MOV Ol.UMANWO ; SE T UP DEFAULT ANSWER TO YES. 

GMANIL TERMSG , GMANWD , 1 , YES 



TRAP 


CJGMAN 


BR 


10000$ 


.WORD 


GMANWD 


.WORD 


T J CODE 


.WORD 


TERMSG 


.WORD 


1 



000340 
150750 



10000$ 

WE GOT A RESPONSE KMQM THE OPERATOR, SO TERMINATE THE TEST. 
60$: SETPRI *>PRIO/ {DISABLE ALL INTERRUPTS. 



CI R CTRLCF 
ENDTST 



MOV A'PRIO/.RO 
TRAP C$SPP. 
ilNUICATE THAT Wt ARE NUT WITHIN A TEST. 



L 10026: 



TRAP 



C5ETST 



Nl^ 



DHU U t-UNC 1ST 
HARDUAf^l:- TEST 

7^:. 10 
7^U1 
7S1.^ 
7Sl,f 
7S14 
7S1S 
7^16 
7'"n7 
7J>1.8 

7S.n) 

7^::i 

7S."'.^ 
7S,^.-^ 

/^;:4 

75^1:3 

7ri36 

7Sr7 
7S?8 
75?9 

7s:^o 

7^J1 
755.^ 
7b?5 
7f.54 
7^i.^S 
7S36 
7S37 
7S38 
7539 
7540 



7541 



754;* 
7545 
7544 
7545 
754ft 
754 7 
754H 
7549 
7550 
7551 



755? 
7553 
7554 



75!.'. 
7556 



03127^ 
031? 7? 
051? r? 
031?7? 
031276 

031300 



031306 
0n3i4 
031316 
031316 
0313?0 
0515?? 
0313?? 
0313?4 
0313?4 
0?.13?6 
0::J13?6 
031330 



PARI4 MACHO M1^00 
- MOOLPB 
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Ul?700 000240 

104441 

000005 

012767 000003 



1?67?/ 
00140? 

10445? 
000 /O? 

104450 

10340? 

1044 3? 
00067? 



150752 



150662 000004 



^EQ 195 



.SBITl. HARDWARE TEST - MOOl.PB - 

- MODEM LOOPBACK TEST - 
THIS TEST IS USED TO MOVE DATA THROUC.f A MODEM WHIC i IS CONNECTED TO 
ONE OK THE DEVICE SERIAL PORTS. THIS TEST 15 RUN ONLY IK MODEM 
l.OOPBACK IS SPECIFIED. THIS TEST UTILIZES THE FOLLOWING OPERATOR 
DIALOGUE: 

MODEM BAUDRATE IN BPS: (D) 1?00 ? 

TYPE <CR> WHEN MODEM LINK ESTABLISHED: CL') Y ? 

MODEM STATUS SIGNAL REPORT: 

LINE m-. DSR-N. RI-N, DCD-N, CTS-N 
REPEATED FOR EACH ACTIVE LINE 
NUMBER OF ?S6 BYTE DATA PATTERNS TO SEND ON EACH SELECTED LINE 

ri-255. 0-SEND UNTIL tC): (D) 1 ? 
PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTERN: CD y v 



J* 
J ♦ 

; ^ 

;♦ 
;* 
I* 
:♦ 

;* 

:♦ 

!* 
i* 

1* 

« 

*. 

* 
*. 

* 

* 
4 

4. 



AT THE COMPLETION OF SENDII<iG THE SPECIFIED NUMBER OF DATA PATTERNS THE 
TEST ISSUES THE FOLLOWING 'PROMPT: 

EXIT THE TEST (N - LOOP HACK TO SEND MORE DATA:): CL ") Y ? 

IF EXTENDED ERROR REPORTING IJ ALLOWED. A REPORT IS PRINTED AT THE END 
OF EACH DATA PATTERN WITH THE FOLLOWING FORMAT; 

MODEM LOOPBACK TEST ST.^.TUS REPORT: PATTERN <^NNN CD) COMPLETED. 

THIS TEST IS PER^'ORMED USIN-^, J BITS PER CHARACTER. 1 STOP BIT. AND NO 
PARITY. THIS TEST DOES NOT SUPPORT SPLIT SPEED. ALL SELECTED LINES 
ARE TESTED AT THE SELECTED BAUDRATE. AN ERROR SUMMARY IS RErORTED AT 
THE END OF THE TEST IF ANY LINES HAVE EXCEEDED THE NUMBER OF INDIVIDUAL 
DATA ERRORS TO REPORT AS SELECTED IN THE SOFTWARE P TABLE DIALOGUE. 

BGNIST 

T3: : 
SETPRI V?PRI05 ; ALLOW LTC iNrERRUPTS. 

MOV ilPRIOS.RO 

TRAP C$SPRI 

f INCREMENT THE ASSEMHl/. TIME TEST COUNTER. 
[SEf UP THE TEST NUMBER. (89) 



TNUM == TNUM ♦ 1 
MOV V)TNUM.TSTNUM 



t * 



VERIFY THAT THE TEST SHOULD BE PERFORMED. 
MODEM LOOPBACK SELECTED. 
MANUAL INTERVENTION ALLOWED. 



MUST HAVE THE FOLLOWING: 



CMPO 
n[ 
EXIT 



L0PBCK,^/4 

?$ 

TST 



2$ 



MANUAL 
BCOMPLETE 
EXIT TST 



4$ 



03133? 012767 1V7777 150660 4$: 



MOV 



^/-l.CTRLCF 



TEST THE LOOPBACK TYPE INDICATOR. 

MODEM LOOPBACK SELECTED? YES, CONTINUE TEST. 

NO. ABORT THE TEST. 

TRAP C$EXir 

.WORD L100?7 

CHECK FOR MANUAL INTERVENTION ALLOWED. 

TRAP CSMANI 

MANUAL INTERVENTION -ALLOWED? YES, DO TEST. 

OCS 4S 

NO, ABORT THE TEST. 

TRAP C5K\U 

.WORD L100?V 

I INDICATE THAT WE ARE IN A TEST. 



IM.b 



DM*.' n ^ l.fNC 1ST PAR in 
HARDUrtHt TFST 



7^S8 

75bO 

7Sf.'^ 
7^^4 
7^^^ 

7b6^^ 
7568 
756^ 

7S'0 
7S.-1 
7S.'.' 
7S7^ 
7574 



Vb7b 



051540 
051546 
051554 
05136^ 



7576 



/*i/ 



7S;8 

7SH0 
7S»l 
7S8.* 
758 5 
'584 
75HS 

75H6 



7',H • 

7*M'* 
75-.<0 



051566 
05l57.> 
051574 



051400 
051400 
051404 
051406 
051406 

05iAia 

051416 
0514?^ 
0514^6 
051450 
051454 
051454 
051440 
051444 
051450 
51454 
051456 
5146^' 
05146c' 
51466 



0514/0 
051474 



051500 
051500 
051504 

051510 
051M4 
051516 
051it'0 



oij/6; 

01^767 
0lrV67 
005067 



004 ;6 7 
10540.'' 
000167 



OlcVOO 
104-141 

0KV46 
0lc'/46 
016/46 
01?746 
10445: 
06P706 

012746 
0U>746 
016 M6 
0U*/46 
1044 5 7 
06^706 

Oh 7C0 
104441 



Ol.'/OO 
004 76 7 



Ol<>746 
012 746 
012746 
010600 

10441 7 



MACHO Ml 200 
■ MODLPR 
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5FU 196 



000001 
021505 
0Ul4h 
151112 



L65 744 
000610 



000340 



0O050G 
027426 
150546 
000005 

000010 

000 500 
02 721^ 
150516 
000005 

OOOOIO 

000200 



005 502 
165660 



0lll4^ 
005550 
000002 



00^^006 



155 74h 
15 5/42 
153756 



MOV OI.ERRIYP 

MOV 06901. .fRRNBR 

MOV 0€Me<)01.FRRMSG 

CLR ERSMRF 



I SET tRROR TYPt AS MTAL IN ERROR TABLE. 

I SET THE FIRST FRROR NUMBER IN ERROR TABLE. 

l?ET fRROR MESSAGF AD0RE5S IN E-RRTBL. 

I INITIALIZE THE "REPORT ERROR SUMMARf" FLAGS. 



JSR 


PC.CLNRST 


BCS 


. ^6 


JMP 


60 1 



HfSET THt OUT TO A KNOWN STATt. REMOVE TMt STATUS COOES F'RQH THE FIFO. 

CLEAR TX AND RX INTERRUPT tNABl E BITS IN THf CSR, 
THIS SUBROUTINE REPORTS ERROR >^>^' fl901 <^<<*, 

iRlSET THE OHU-ll. REPORT ANT FRRORS roUND. 
(SKIP EXIT Of TEST If NO FATAl ERROR FQUNO. 
iRESET FAliuRf, ABORT THIS TEST, 

i SET UP FOR TRANSMIT AND RECEIVE INTtRRt^MS. 

SETPRI 0PRI07 iDISABLE All INT^f^RUPTS. 



SETVEC TXVtCA,orxDMA,OPR106 



SETVEC RXVt-CA,0«XCH«S,0PR10h 



;f TPRI 0PRI04 



MOV 


OPRI07,RO 


TRAP 


CJSPRI 


I5EIECT DMA Tx INT SERVICE HIN. 




MOV 


0PRI06. -tSP) 


MOV 


OTXDMA. -(SP) 


MOV 


TXVECA, ■ (SP) 


MOV 


03. CSP) 


TRAP 


CJSVEC 


ADO 


010. SP 


1 SELECT RX INT SERVICE RTN. 




MOV 


0PRI06. (SP) 


MOV 


ORXCHRS, (SP) 


MOV 


RXVECA, -CSP^ 


MOV 


05. (SP) 


TRAP 


CISVEC 


ADO 


010. SP 


NTKRRltPTS. 




MOV 


OPRI04,RO 


TRAP 


CJSPRI 



I » 



\ ClEAR The C^IMUATtVF FRROR COUNTERS i ONE FOR FACH L INF \ 



MOV OFRCNTB.RO 

JSR PC.Cl RU.W 

I • 

1 PRINT THt THE TfST NAHF . 

I - 

PRINTS OFL050 5.0FMH401 



iCLEAR THE RX ERROR COUNTERS TABU. 



MOV 


0f,M8'KU, 


I. SP ^ 


MOV 


o^yo'^0^. 


C^P"> 


MOv 


02. ^SPI 




Mdv 


,P . F^O 




TRAP 


LW"'NH- 




ADO 


06. SP 





PREF'AWt TO CAl I THt- ',F I -4* HIjUHNF. 

l.f T THt DFSIRFO HAlHlRATt ^ROM IH( ilPlWATDR, 

CALCU.ATf PROPER OVl I PR CONFfNIU. 

CALCULAIt THE PROPER HX ^IMt-OUT VALUE FOR iHiS 5PEE0» 



Clb 



RHHoiAHf^'Vl^s}^^ ^'^«^'' ^'^ftBBi PA^^^^^* ^^ "'^^ ^' ^^"='*'^ ^^'^^'^^ ^^^ 



'".EQ 197 



7S'46 
7S9? 

7'.<),^ 

760C 
7601 
760.^ 

760. S 
760A 
7hOS 

VbO .' 
7bOa 

7M0 
7611 

76 1:^ 

761^ 
7614 
7615 
7^.16 

76 1 r 
7610 
763.9 
76;>0 
7621 
762? 
7625 
7624 
762S 
7626 

762 7 
7628 
7629 
76-Vi 
765! 
76 5/ 
76 55 
7f5 54 
765*. 
7636 



051!) :^4 
OJ1550 
051552 
051554 
051536 
051540 
05V 542 
051544 
051546 
OS 1552 

U51556 
031562 



051570 
0315/2 
051576 
051600 
031602 
051604 
031606 

05lbl0 
031ol2 
031616 
031620 
031622 



004 76,' 
OIOIOO 
006301 
006301 
006301 
006301 
050001 
000501 
042/01 
052701 

00^ ^6/ 
012767 



00500? 
012702 
010204 
105505 
110324 
105705 
001374 

010205 
012700 
012524 
005300 
0013/5 



05U30 
051654 
031640 



051644 
031652 
031652 
051654 
031656 
051660 
031662 
031^)64 
031666 



012700 
016705 
004767 



1065/6 



0003 7 7 
000050 

:.66/54 
177400 



003': 



1504/.. 



000020 



031624 012/03 000400 



011000 
150532 
175222 



012767 OvJOOl 150356 

10444:. 

000404 
002250 
000150 
0150/4 
000001 



7».S 

7''j58 

7^ f ♦ 

7^,40 

V641 03it?6t» 004/6/ I073i^ 



I • 



ser UP THF. ytT map o^ uNusbO tx/rx bits. 



jsR pc,c;f todr 

MOV RJ. .RO 

A51 Rl 

ASL Rl 

ASL Rl 

ASL HI 

BIS RO.Rl 

SWAB Rl 

BIC #377. Rl 

BIS 030. Rl 

JSR PC.CiETTIM 

MOV 0177400. IBM 



(GET DUPLICATE COPIES OF BAUDRAIE CODE 
I IN THE UPPER BYTE OF THE NEW 
I I PR CONTENTS. 



iStT UP 1 STOP BIT. NO PARITY 
I IN THE LPR CONTENTS. 



8 BITS/CHAR 



iGET TIME 'OUT BASED ON MINIMUM BAUORATE IN USE 
iFORM BIT MAP OF UNUSED TX/RX BITS, 



I SET LtP A 256 BYTE DATA PATTERN. 



i ' 



6}: 



8$ 



Cl:^ W5 

MOV oeUFBAS,R2 

MOV R2.R4 

DLCH R5 

liOVb R3.CR4)» 

VSTB R5 

BNE 61 

MOV R2.R5 

MOV 016., RO 

MOV (R5)*.(R4)* 

DEC RO 

RNE et 

MOV 0256. .R5 



(PREPARE 
I GET THE 



TO START DATA PATitRN AT 255. 
BASE OF THE DATA PATTERN BUFFER 



lUET THE NEXT BYTE OF THE DATA PATTERN. 

IWRITE A BYTE OF THE DATA PATTERN. 

iCHECK FOR DONE WRITING DATA PATTERN. 

(DATA PATTERN DONE? NO. LOOP TO 00 NEXT BYTE. 

jtES. write 52 BYTE OVERFLOW REGION. 

(PREPARE SOURCE POINTER. 

(PREPARE LOOP COUNTER. 

(WRITE 2 BYTES OF THE OVERFLOW PATTERN, 

(COUNT THESE 2 BYTES. 

1 16 WORDS WRITTEN? NO. LOOP TO U«ITE ANOTHER. 

(YES, COMPLETE DATA PATTERN IS DONE. 

(SET DATA PATTERN LENGTH TO 256. 



t SET THE OUT RTS AND DTR BITS FOR THE ACTIVE LliStS. 



I - 



MOV 
MOV 
JSR 



011000. RO 
ACTLNS.R5 
PC.WTWLNC 



iSPtCIF t 
(SPECir> 

(SET OUT 



TO SFT RTS AND 
ACTIVE LINES. 
RTS AND DTR ON 



DTR. 



ALL ACTIVE LINES. 



WAIT fOR 
PROMPT 



IME OPERATOR TO 
"Ty;JE <CR> WHEN 



ESTABLISH THE MODEM CONNECTION. 
MOOFM I INK. ESTABLISHED:" 



I ' 



MOV Ol.GMANWD (St I UP DEFAULT ANSWER TO YES. 

GMANIL EMLMSG.GMANWD, I . YES 



100005 

RH'ORT IH(- ^TMTt 0* IMF MOOf M S ! A ! i ", MCNAl/,. 

SET DEKAU T OF PRINT IN(. MODEM -TATUS AFTER tVERl DATA PAT TERN. 



TRAP 

BR 

.WORD 

.WORD 

.WORD 

.WORD 



CJGMAN 
10000$ 
GMANWO 
TSCODF 
EMLMSG 
I 



jbR 



PC.MSSRPT 



RSNoiApl^^fsl 



ST PART4 



) 1 e 



'''^fiBHi P^'^^^ 



IS MARH4 0^!4W PAGf i^^ S 



SEQ 19Q 



7h4^ 


OJlh?*-* 


OKr/67 


OOOOOl 








7h44 








7^4S 








7^4^ 








764 ' 








?t4S 


051700 


01^^767 


OOOOOl 


7t.49 


051 70f. 








05170b 


104445 






051. '10 


000406 






05171/ 


0O*\'50 






051/14 


00005^ 






051716 


oi?c:?4 






0517.^0 


0005?/ 






051 /:\' 


oooooo 






051 /.'»4 


0OO?5S 






051/^6 






VbSO 


051 /^^ 


016704 


1S0.'76 


7t>5l 


05175^ 


005005 




78SJ 


031734 


005067 


150264 


7bS? 








7bM 








76bS 








7t>'j6 








76"^ ; 








7658 


051740 








051740 


104445 






051/4^ 


000404 






051744 


00r?44 






051746 


000130 






051750 


0155S^> 






051/5.^ 


OOOOOl 






0S17*J4 






7f/,9 








7bf>0 








7bt,l 








7^^,^ 








Vbb 5 








"/6h4 








V^6S 








7666 








766/ 


0517^4 


OO5c>05 




7668 


051756 


004 767 


I6b/^.^ 


7669 








76/0 


05176? 


004/67 


17066.? 


■/6 ; 1 


051766 


105110 




7b /^* 








76/ 5 


051 7/0 


004 /6 / 


W1140 


76/4 


0,»l //4 


0O4/6 7 


166614 


76 /S 


05.^000 


01^767 


0^1506 


76 /6 








76 ; ; 








76/8 








76/'» 


05c'^OO6 


004/6 7 


i/ir>6 


7680 








Vr^l 


O^.'if] ,• 


()(.;' /»./ 


150,^)6 


vt,a^ 


o?;'>oi6 


0O1404 





150544 



MOV 



*>i ,PMSH c; 



ASK OPfRATOR FOR THK NUMBtR Of- DATA PATTtHNS U) Sf ND . 

PROMPT: "NUHeER OF ^56 BtTE DATA PATTtRNS TO StND ON tACH Sfcl.tCThD LlNt 

C1-P55, 0-^FND UNTIL ^C); CD) 1 ?" 



1503^^ 10$: 



MOV ftl.GMANWO ibtT DEF AU T NUMBhR OF PATTERNS TO 1. 

GMANID NDPMSG.GMANWD. 0,577, 0,255, res 

TRAP CJGMAN 

BR 10001 i 

. WORD GMANWO 

.WORD TiCOOF 

.WORD NDPM5G 

.WORD 37 7 

.WORD TM Ot.IH 

.WORD T$HILIM 
10001$: 

(CLEAR THE DATA PATTERN COUNTER. 
ICIFAR THE "AT LEAST ONF ERROR" FLAG 

ASK IF MODEM STATUS SIGNALS SHOULD BE REPORTED AFTER tACH DATA PATTERN. 
PROMPT: "PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTL'RN: (L) Y V 
USE LAST RESPONSE AS DEF AU T (DEFAULT OF >ES THE FIRST TIME). 

GMANIL PMSMSG,PMsrLG,X,iL5 



MOV 


(;manwd.R4 


CLR 


H5 


CLR 


FERROR 





TRAP 


C$GMAN 




BR 


1000? i 




.WORD 


PMSFLG 




. UuHD 


TJCODE 




.WORD 


PMSMSG 




.WORD 


1 


lOOOuM; 







1 SET UP IMF OUT AN(^ T\/RX v;>i^ l A(U (■ S . 

i Rl - rx, RX LPR CONTINTS. 

t R? ' START ADDRl S^ CJ^ iJM I A F'ATTERN TO TX'-RX. 

; R5 IfNGTH OF DATA PATTERN. 

1 SFNO THF DATA. 

t ♦ 



lc?$ 



155310 



( TH 



INC 
JSH 


RS 

PC.MODSUF' 


JSH 
BCC 


PC.PLJfUO 
60J 


J'.W 
JSW 
MOV 


F^C.PJRRXB 
PC, [NIDMA 
0«9t\\ .FRRNBR 


I'- HOUTINe RF PORTS FH 


J ,R 


PC.RDCHHS 


1' T 


i I RRUR 
15$ 



iCOUNT THIS DATA PATTERN. 

iSEI UP THE. DUT AND TX/F^X VARIAHIES. 

IPURGF TMt DUT RECEIVE CHARACTER UFO. 

I ABORT THIS TEST IF r UO WOLt D NOT PL.«LiE . 

jPURGE THE RX CHAR BL*'UR IN MEMORi . 
iSENO THf FIRST BATCH U^ DATA PATTERNS. 
iSI-r tRRLlR N\.iMBFR TP 8^05, 



FHHORS WHH MHiBFRS »»>-» 840? THRU 8^0/ ^i^^^. 

iRHH) AND VFRIFt THF HX CHARACTtRS, 

iHAs AN tRROR FUtN 01 TtCTtD 7 
iHRANCH IF 11 HASN- T. 



ib 



DHU U FUNC T 
HARDWARt Tl r,T 



■;T PART4 



MACRO m, 
MODIPB 
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^EQ 199 



7b85 
?684 

7^8S 

7b86 
768 7 
7688 
7b H*^ 
7^^.H> 
7t>^n 

7694 
78 ^S 
76-^6 



76-^7 
76S8 

769^ 
7/00 
7/01 

7 ;o^^ 

7 705 
7/04 
7?0S 
7/06 
7 707 
7/08 
7 /09 
7/10 
7/U 
7/lc^ 
7713 



05J0«?0 
05^026 



7/14 
771S 
7/1*1 
7/1/ 
7/18 
7 / 1 'i 

'n?o 

7/ri 

7 /,^4 
7/,»S 
7726 



OV/6/ 
001430 



000100 150134 



HIT <?Bir06. OPTION 
Bt.U 16$ 



iHAS tXTENDEO ERROR REPORTING BEEN REQUESTED ? 
iBRANCH TO THE "FXIT TEST ?" QUESTION IF NOT. 



032030 OU'767 021314 153260 13$ 



032036 004 767 174204 



032042 
032042 
032044 
032050 
032054 
032056 
032060 
032064 
0320/0 
032072 



052076 
032100 
052102 
032104 
032106 



052110 
032116 
032116 
032120 
03212^ 
032124 
032126 
032130 
052132 
052152 
052140 



052142 
032144 
052150 



010546 
012746 
012/46 
010600 
104415 
062 /06 
005767 
001402 
004767 



005504 
001403 
100524 
005204 
000722 



026/2/ 
001257 



HOV 08908. .(-RT-^NBR jSET ERROR NlfMBER TO 8*^08, 

THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>•*>> 8906 THRU 8911 ^^^^<. 

JSR pr.TXRREP iRFPORT FTMAl FRRQR^ FROM RX/RX. 

REPORT END OF DATA PATTERN IF AHOWfD. 

"MODEM LOOPBACK TEST STATU'i REPORT; PAl >■( RN ONNN CO) COMPLETED." 
REPORT THE MODEM STATUS SIGNAL STATES IF REQUESTED. 



PRINTX 0EDPFMT.R5 



0054 22 
000002 



000006 
150154 

167126 



TST 
HEQ 
JSR 



PMSn (, 

14$ 

PC.MSSRPT 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

jCHECK THE "PRINT MODEM STATUS" FLAG. 

jPRINT MODEM STATUS? NO. SiaP PRINTING. 

jREPORT THE MODEM STATUS. 



R5. ^CS'>) 
OEDPFHT, -CSP) 
«2. (SP) 
5P.R0 
CJPNTX 
66, SP 



I IF THERE ARE MORE DATA PATTERNS TO SEND, LOOP BACK TO SEND AGAIN. 



14$: 



t 



DEC 
BEQ 
BPL 

INC 
RR 



R4 

16$ 
12$ 
R4 
12$ 



(COUNT THIS DATA PATTERN. 

jlAST DATA PAT SENT? lES. PROMPT FOR EXIT. 

iNO. CONTINOUS SENDING? NO. SEND NEXT lAT. 

(1ES, RESTORE PATTERN COUNTER. 

(GO TO SEND NEXT DATA PATTERN. 



; PROMPT FOR EXIT Of THE TEST OR SENDING Of MORE DATA PATTERNS. 

J PROMPT; "EXIT THE TEST (N ^ LOOP BACK TO SEND MORE DATA): (L) Y ?" 



012767 000001 150112 16$: 

104445 
000404 
002250 
000150 
015143 
000001 



MOv 
GMANIL 



Ol.t.MANUD (SM DEFAULT ANSWER TO lES, 

EXTMSG.GMANWO.l.rES 



TRAP 


C$GMAN 


BR 


10003$ 


.WORD 


GMANWO 


.WORD 


T$CODE 


.WORD 


EXTMSG 


.WORD 


1 



150072 000001 



CMP 
BNE 



GMANWD.Ol 

10$ 



1000^$: 
tCHtCK OPERATOR Mt SPQN St . 

itXIT RfSPONSt? NO, LOOP TO SEND MORE DATA. 
(NO. EXIT ROUTINE. 



AIL OONF . HAve Bf f N TOLD TU MIT. 
ClfAR DEVICE OTR AND RTS SUiNAlS. 
DP.ABll INTeRRLiPT',. 
CttAR THt- INTFRRUPT VfCTORS, 
REPORT ANf NECESSARY ERROR SlfMMARlES. 



005000 

01r'/05 

004 767 



1 / / ; ; ,' 

174 712 



CI R RO 

MOV OMAPl NS.RS 

JSR PC.wrWLNC 



lINDICAft 10 CI FAR All INCTRl BITS. 
tlNOlCAM TO CLfAR FOR All l. INF '. . 
(CIEAR All THE RTS AND DTR SluNAl .. 



J- 



tJ 



OHU I I KING TST 


PART4 


MACRt) MlrH)0 1' 

■ moDlpb 


HARDWARl 


n ST 




77.^8 


05.^1S4 








03?154 


01^700 


000340 




03.^160 


104441 




7 7c?9 


OSfUbt? 








03^16.^ 


016/00 


15000^ 




052166 


104436 




7750 


o3,n/o 








05P170 


016700 


147772 




03P174 


104436 




03^1 ?6 


01c'/67 


021320 1^3112 


7 7 5? 


05r'?c>04 


004 767 


171620 


7734 


o3^;no 








03^^10 


Ol.VOO 


000340 




03..cn4 


104441 




7"5S 


3c^^l6 


005067 


147776 


7 7 36 


03c\\\" 








05^i?^a 


104401 





60$: 



SETPHl ffPRIo; 



CLRVfcC TXVhCA 



CLRVEC RXVF.CA 



MOV aft912. .tRRNBR 
JSR PC.RCPSMR 
StTPRI 0PRIO7 



CLR CTRLCF 
tNPTST 



iDISABLF All INTFRRUPTS. 

MOV #PRI07.R0 

TRAP CJSPRI 

I RE TURN TX INT VF.CTOR 10 UNU^jED POOL. 

MOV TXVtCA.RO 

TRAP C*CVEC 

jRETURN RX INT VECTOR TO UNUSED POOL. 

MOV RXVECA.RO 

TRAP CJCVEC 

iStLECT NUMBER 8^12 KOR THE NEXT fcRHOR REPORT. 

iRfPORT ERROR SUMMARIfS IF CALLED ^OR. 

iDISABLE ALL iNTFRRUPTS. 

MOV 0PRI07.ro 
TRAP C$5PRI 

I INDICATE THAT WE ARE NOT WITHIN A TEST. 



L10027! 



SEQ 200 



TRAP CJETiiT 



Uib 



OHU U TUNC 1ST PARTn 
HARDWARt ^ ^ 



T£ST 



MACRO MU?00 U 
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'^EQ ^01 



7 *58 
7 7?Q 
7 740 
7 74 I 
7 74:? 
7 /4< 
/ :44 
774S 
7 Mb 
7 74 7 
7 74y 
7 74^ 
7 7'.iO 

7;si 

77S^ 



7 753 
7 /S4 
7 7SS 
7 756 
7757 
7/58 
7 759 
7 760 
V?61 
77h;> 
7 765 
7 764 
7765 
7 766 
7 76/ 
7 768 
7 769 
7 7 70 
7771 
7/72 
7 7 75 
7 7 /4 
7 7 75 
7 7 76 
7 77/ 
7 7/8 
7 7 79 
7/80 
7 781 
7 78^ 
7 783 
7 784 
7/85 
7 78b 
7 78 7 
7 788 
7 7H'* 
7 7'»0 
7791 



05t^?24 
03t?3r'!4 

032^a4 
032224 
032230 



052232 
032240 
052246 
052254 
052262 
032270 



032302 
052306 
032510 



052514 
032322 



052550 
052554 



012/00 
104441 

000004 
012767 
012767 
012767 
012767 
012/67 
012767 



004 767 
105402 
000167 



016 76 7 
01276 7 



00576 7 

001007 



0525 36 012767 



052544 
032352 



012/6 7 
000442 



0002A0 



000004 
177/77 
000001 
010461 
010174 
014032 



032276 005067 001402 



150020 
14 7752 
155040 
153054 
155050 
153024 



165030 
001332 



145464 14/754 
027404 145454 



147764 

001252 14 7b56 
000021 001324 



Brn. HARDWARE Ttbl - DMAADR 

- DMA ADDRESSING Tt5. 
THIS TEST VERIrlES , AS FAR AS POSSIBLE . THAT THt Uu't CAN PERFORM A 
DMA FROM A FULL 18 BIT OR 16 BIT ADDRESS. THE TEST RELlEb -r^N FINDING A 
COMPLEMENTARY PAIR OF ADDRESSES BETWEEN THE tqP OF PHYSICAL MEMORY AND 
THE START OF THE TOP OF THE DIAGNOSTIC PROGRAM . 

THIS MAY INVOLVE REMOVING PART OF THE DIAGNOSTIC RUNTIME SERVICES AND 
THEN RESTORING. THE NUMBER OF BITS THAT HAVE BEEN SUCCESSFULLY TESTED 
WILL BE PRINTED AT THE CONSOLE AT THE END OF THE TEST. IF REQUESTED. 

BGNT5T 

T4:i 



SETPRI flPRIOS 



TNUM ■- TNUM ♦ 1 

MOv *TNUM,TSTNUM 

MOV A-i,CTRLCF 

MOV OI.lRRTyP 

MOV 04401. .ERRNBR 

MOV #€M4401.ERnMSG 

MOV »€R0503,ERRBLK 



jALLOW LTC INTERRUPTS 



MOV 
TRAP 



i>PRI05»R0 
CJSPRI 



;irCREMENT THE ASSEhffiLY TIME TEST COUNTER 

jSET UP THE TEST NUMBER 

(INDICATE THAT WE ARE IN A TEST 

jSET ERROR TYPE AS FATAL IN ERROR TABLE 

jSET ERROR NUMBER TO 4401 

:SET ERROR MESSAGE ADDRESS IN TABLE 

iSELECT THE CORRECT ERROR REPORTING ROUTINE 



1 ♦ 



CLEAR THE SUCCESS t-LAG TO INDICATE TEST FAILURE IN CASE IT DOES 



I - 



CLR 



SUCSS 



i INDICATE FAILURE . IN CASE THE DUT FAILS 



J RESET THE OUT TO A KNOWN STATE. RtMUVE THE STATUS COOES FROM THE FIFO. 
t CLEAR TX AND RX INTERUPT ENABLE BITS IN THE CSR 
i - 

JSR PC.CLNRST i RESET IHt UHU , REPORT ANl ERRORS 

BCS .♦6 (SKIP EXIT Of TEST U NO FATAL ERROR FOUND. 

JMP 60$ iEXTT THE TEST. FATAl ERROR WAS FOUND. 

; SET UP THE 004 TRAP VECTOR TO POINT TO UUR TRAP SERVICE ROUTINE. 

i ■ 

MOV 4.TP4VEC (SAVE THE EXISTING 004 TRAP VECTOR 

MOV <>TP4RTN,4 {POINT THE VECTOR AT OUR SERVICE ROUTINE. 



DETERMINE WHETHER MEMORi MANAGEMENT IS PRESENT 



I - 



TST 
BNt 


MMr'RE S 


MOV 


01252, DMTSTA 


MOV 
RR 


o\:. .HITSTD 
lOJ 



»IF MEM MGT IS PRESENT THEN 

(AVOID SETTING THE DMA TEST ADDR FOR 

jA lf» BIT MACHINE . 

I^^ ; UP THE FIRST DMA TLST ADUH FOR 

J A l^ BIT MACHINE 

r>E T THE lUTS TESTED 10 l«^ • I 

iSINCE MEM MGT TSN T PRESENT 

jTHERF'S NO NEED TO SET UP THE MEM MGT REGS. 



SF r UP THE HIGHESl POSSlFlLt TEST ADORE Ss IN DMTSTA 
032354 012767 00b2b2 14/640 1$; MOV 052S2. DMTSTA iSET UP THE FIRST DMA TEST ADDRESS FOR THE 



DHL) n iV 
HARDWARE 



"Ih} 



l-l I tj 



ST PART4 MACRO Mlc>0 
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SEQ 202 



■; :^^ 

7 7^$ 
7, '94 
7 /^!i 
7 796 
7797 
7 798 
7 799 

7800 
7601 
780.^ 
7805 
7804 
780^ 
7806 
7807 
7808 
780'* 
7810 
7811 
781^ 
78H 
7814 
781^5 
7816 
7817 
7818 
7819 
7820 
7821 
7822 
7825 
7824 
7825 
7826 
782 • 
7828 
7829 
7850 
78^1 
7852 
7855 
78 54 
78 5" > 
7856 



78 5 7 
78^8 
7859 
/840 
7841 
7842 



784 '. 
7844 



052562 012767 000023 001506 



032570 
032572 

052576 
032400 
052404 
032410 



005000 

012701 002524 



010031 
062700 
022 701 
0015/2 



000200 
002342 



032412 012777 177600 147722 



032420 
032424 
052450 
052432 
03243b 



012700 
012701 
010051 
022701 
001374 



7 7406 
002544 

002364 



052440 
052444 
052450 
052454 



00506 7 
012 700 
016701 
004767 



001226 
035672 
147642 
164576 



052466 
052466 
032470 



104451 

010067 14 7552 



0524 74 012/01 003602 
005004 

000340 



052500 
052502 
052502 
052506 
05.-MO 
032bl2 



012/00 
104441 
005204 

oo;>ooi> 



MOV 



019. .blTSTD 



( 18 DIT MACHINR. 

(SET THE B-IT5 TESTED TO 18 BITS f 1. 



( SET UP THE PARS THROUGH 6 TO RELOCATE TO THE SAME ADDRESS 



CLR RO 

MOV OPARATB.Rl 

2$i MOV ro.acRD* 

ADO 0200.ro 

CMP 0PAR7A.R1 

BNE 2 $ 



I SET THE PAGE BASE ADDRESS TO ZERO 

;P0INT '.T THE START OF THE PAR ADDRESS TABLE 

(LOAD THE. PAR 

(CALCULATE THE NEXT PAGE ADDRESS 
(LOOP UNTIL PARS THROUGH 6 
(ARE LOADED. 



SET UP THE INPUT/OUTPUT PAGE PAR TO THE TOP 4KW OK PHYSICAL MEMORr 



1 - 



MOV 



0177600. aPAR7A (SET PAR 07 TO POINT AT THE TOP 4KW 



SET UP THE PDRS TOR . NO ABORT/TRAP. UPWARD EXPANSION. 128 BLOCKS PER PAGE 



J - 



4$: 



MOV 


07 7406.ro 


MOV 


WORATB.Rl 


MOV 


RO.aCRD* 


CMP 


OPORATE.Rl 


BNE 


A% 



(BIT PATTERN EQR THE PURS 

(POINT AT START OE PDR ADDR TABLE 

(LOOP UNTIL ALL POPS HAVE 
(BEEN SET UP. 

SET THE MEM MGT STATUS REG 05 KOR. 18 BIT AOORESSSING. 

NO UNIBUS MAPPING. NO D SPACE. IN CASE THIS REG EXISTS. 
NOT ALL UNIBUS MACHINES HAVE MEM MGT STATUS REG 03. SO THE CKTR'\P ROUTINE 
[ MUST BE USED TO CATCH AN 004 TRAPS THAT OCCUR IF THE REG DOES NOT EXIST. 

(StT UP THE SOURCE OPERAND 

(SET UP THE SOURCE ADDR KOR THE MOVE. 

(SET UP THE DESTINATION ADDR FQR THE MOVE. 

(PERFORM THE MOVE AND CATCH ANY 004 TRAPS. 
J ♦ 

; TRY AND FIND A COMPLEMENT AR'r PAIR OF ADORt SSt S WITHIN THE MEMORY AND SAVE 
( THE CONTENTS OE T.HE TWO AREAS. THf, T^ST IS ABANDONED IF A COMPLEMENTARY 
I PAIR HAS NOT BEFN FOUND BEFORE THE AREA OF' MEMORY CONTAINING THE 
( DIAGNOSTIC IS FNCOliNTEREO. 



CLR 


70J 


MOV 


070i.RO 


MOV 


MM5R5.R1 


JSR 


PC.CKTRAP 



032460 012767 027362 145316 10* 



MOV 



OTP4BRT,4 



MEHUttl FFREM 



12 J 



MOV 

Cl R 
5t TPRl 



ISC 
CLR 



OBUHAS.Rl 

R4 
OPRTO/ 



R.; 
R5 



(CHANGF THE 004 TRAP VECTOR TO POINl TO 
{TP4BRT SINCE THIS IS THE ROUT INF ASSOCIATED 
(WITH the: By IF SUBROUTINE CKTRPR. 

;(,tT THt ADORtSS OF THf RST FREE WORD 

TRAP CtMEH 
MOV RO.FFREM 

(OF MEMORY ABOVE THE DIAGNOSTIC. 

(POINT AT lHk BL»HR WHF Wt THE CONItNT') in 

(THE HtMORi BEING HEAD AHF TO BF SA^FP. 

(Clear the COM*>LFMF.NrARr PAIR INDICATOR lC^VM 

(DISABIF ClOCK INTERRUPTS 

MOV .'?PRIO;,RO 
TRAP CStjPRI 

(INCH^M^^l ih cpi 

UNDICATE THAT A SAvt OF THE UATA AT 



lib 



OHU 11 (-UNC TST 


PART 4 


MACRO M1200 1! 


HAROWARt 


TF5T 






■ OMAAf 


7845 










784^ 


05c*514 


012705 


000020 




784? 


0525aO 


004767 


165044 




78*1 rt 


05.'^ 5.^4 


012701 


004202 




7849 


05.^^50 


005767 


1** . >20 




7850 


05»?554 


O01403 






7851 










785J 


03i>536 


005004 






7855 


03?540 


01270i 


JO 5602 




7854 
7855 
7856 


052544 


022704 


000002 




032550 


001447 






785 7 


03.^55.» 


016767 


147444 


001122 


7858 


03.>560 


000241 






7859 


03<'^56c? 


006067 


147434 




78feO 










7861 


03^566 


005567 


001104 




786^ 










7865 










7864 










7865 


032572 


032767 


176000 


I4742i^ 


7866 










786 7 


052600 


001343 






7868 


032602 


004 767 


164 710 




7869 


052606 


02006 / 


147414 




7870 


032612 


103336 






7871 










787P 










78/5 










78 74 










7875 










7876 


032614 


022767 


000252 


14/400 


78/ ' 


052622 


001014 






7878 










7879 


052624 


012767 


000652 


147570 


7880 


032632 


062700 


040000 




7881 


052636 


020067 


147364 




788^ 


052642 


105404 






7885 


052644 


012767 


000016 


001024 


7884 


052652 


000/16 






7885 










7886 


0526 54 


005267 


152436 




788/ 


032660 


012701 


010224 




788H 










7889 










7890 


032664 


000167 


000754 




7H91 










789? 










7895 










7894 










;895 










7896 










789 / 


052670 


012 700 


OOM50 




7898 










7899 


0526/4 


01676/ 


i4/;c.v 


OOU/ -9) 


7900 


032702 


016/67 


000774 


147312 


7^01 











IR 
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SEQ 203 



14$: 



MOV 

JSR 
MOV 
T5T 

BtU 

CLR 
MOV 
CMP 

BtQ 

MOV 
CL.C 
ROR 

UKC 



i»16. .R5 

PC.DMRW 

^Uf-MIO.Rl 

TP4FLCi 

14$ 

R4 

<>eUFBAS.Rl 

«2,R4 

WJ 
DMTSTA.ODTSTA 

DMTSTA 

BITSTO 



(DMTSIA) IS REQUIRFO, 

SET THE NUMBER 0^ BtTES TO BE READ 

SAVE THE DATA CONTAINED AT ADDRESS DMTSTA. 

POINT AT SECOND STORAGE AREA 

IF WE HAVE vr.LID MEMORY THEN AVOID CLEARING 

THE CPI AND RE5ETING THE SAVE AREA ADDR 

CLEAR THE CPI. 

RESET THE ADDR FOR THE SAVED DATA STORE 

IF A PAIR OF COMPLEMENTARY ADDRESSSES HAVE 

BEEN FOUND THEN 

GO AND WRITE THE TEST DATA TO THESE ADORS. 

SAVE THE OLD DMTSTA 

CLEAR CARRY REAOr FOR THE ROTATION 

COMPLEME.NT THE DMTSTA TO PRODUCE THE NEXT 

DMA TEST ADDR. 
DECREMENT THE NUMtJER OF BITS TESTED COUNT 



1 CHECK THAT IHE NEW DMTSTA IS NOT INSIDE THE DIAGNOSTIC PROGRAM 



BIT 



^176000. DMTSTA 



1252 



IF IT :S THEN WE'RE 



BNE 


12$ 


JSR 


PC.DM16B 


CMP 


RO.FFREM 


BHIS 


12$ 



J IS THE DMTSTA > 

I SAFE 50, 

jBRANCH AND CONTINUE WITH THE SEARCH 

jCONVERT THE DMTSTA TO A PHYSICAL ADDR. 

lARE WE INSIDE THE DIAGNOSTIC REGION ? 

iNO , THEN BRANCH AND CONTINUE WITH THE SEARCH 

; ♦ 

i SINCE WE ARE NOW INSIDE THE DIAGNOSTIC. WE INCREMENT BIT 014 OF THE DMTSTA 
iPHYSICAL ADDRESSS AND IF WE'RE STILL INSIDE THE DIAGNOSTIC WE ABANDON THE 
;TEST. ONCE WE ARE IN THIS REGION WE ARE ONLY ABLE TO TEST THE LOWEST 14 BITS. 

I - 

\U Tt-* BIT HAS ALREADY BEEN SET THEN 

t ABANDON THe TFST. AFTER REPORTING THE ERROR . 

, BECAUSE NO SUITABLE MEMORY HAS BEEN FOUND. 

jSFT THF BIT 

jADP THl Bir INTO THE PHrSICAL ADDR 

lU WE RE NOW STILL INSIDE THE DIAGNOSTIC THEN 

(REPORT ERROR AND ABANDON THE TEST. 

lOTHERWISE SET THE BITS TESTED TO 14 BITS. 

jCONTINLt WITH THE SFARCH. 



lb$: 



16$; 



CMP 


#252. DMTSTA 


BNE 


15$ 


MOV 


*6S2, DMTSTA 


ADO 


040000. RO 


CMP 


RO.FFRtM 


BLO 


15$ 


MOV 


014. .BITSTO 


BR 


12$ 


INC 


tRRNBR 


MOV 


MM4402,R1 



JMP 



54$ 



iStT THE e.RROR NUMBER TO 4402 
iSELFCT MESSAGE TO BE REPORTED. 
1 ' NO SUITABLF ADDR FOUND. DMA 

(JUMP TO THE ERROR. 



TEST ABORTED 



I ♦ 

i WRITh THt TtST DATA 

1 WE ARE WRITING DATA 

( 



INTO THE TWO AREAS JUST fOUND. 
INTO THE5E AREAS THEN THE HOST 



U A TRAP OCCURS WHILE 
MACHiNI IS AT FAUl T. 



17$: MOV «')DPB"S.RO 

MOV DMISTA.DUMi 

MOV QOTSIA.OMIsTA 



jSF T lip THE SOURCE ADOH FOR THE MOVE AS OUR 

I Tt SI DATA PATTERN. 

iSAvh iHtr L LJWt-M DMTSTA 

iSIAMT WITH \Hh HIl.Ht-R J^ THE TWO 

I COMPlEMbNTARi ADDRESSES. 



Jib 



DHL' 11 FUNC TSl 
HARDWARE TrST 



PART4 MACRO Mlc^OO 15 MAR -84 

- DMAADR - 



09:48 PAGE 134-^ 



^EQ 204 



790,? 


03?/10 


012 703 


000020 


7903 


03?714 


012705 


000001 


7^^0S 


03?7?0 


012701 


000340 


7906 


03?7?4 


004767 


172254 


790.' 








7Q08 


032730 


005267 


152362 


7^09 


032734 


012701 


010272 


7910 








7911 








791.^ 








7913 


032740 


004767 


164624 


7914 


032744 


005767 


147304 


791!:-. 


032750 


001345 




7916 


032752 


016767 


000722 


7917 


032760 


012700 


005154 


7918 


032^64 


004 767 


164600 


7919 


032770 


005767 


147260 


79J0 


032774 


001353 




V9.n 








792? 








79^3 








^9i^4 








792S 








7-^.^6 








79(' J 








79^8 








79?9 








7950 


032 7. -6 


00526*' 


152514 


7^i3l 


03500? 


004 767 


164774 


793? 








7933 


033006 


01010? 




7934 


033010 


012701 


010367 


7^3^ 








79.-. . 


C330M 


103402 




793- 


o:::.oi6 


0C016 7 


000424 


793H 


033022 


010201 




7939 








7940 








7941 








794? 


053024 


012700 


000204 


7943 


035030 


004 767 


174052 


7944 


035054 


012700 


177670 


794^ 


035040 


004767 


1/405? 


7946 


035044 


004 767 


172560 


794/ 








7948 








/949 








79S0 


055050 


016/05 


000626 


79^1 


035054 


012/04 


005150 


79!j? 


033060 


010167 


000610 


79b 3 


03 5064 


012767 


00000? 


7954 








795S 


0330/2 


012/00 


000052 


79^6 


03307b 


005005 




791>/ 


03310''^ 


012/0? 


000006 


V9S8 


053104 


006305 





14 7242 



MOV 016.. R3 

MOV <n,R5 

hOV ^540, R I 

JSR PC.STPSW 

INC ERRNBR 

MOV ftEM4403,Rl 



JSR PC.DMRW 

TST TP4FLG 

BNE 16$ 

MOV DUMY.DMTSTA 

MOV *S0P2B,RO 

JSR PC.OMRW 

TST TP4KLG 

BNE 16 J 



GET THE NUMBER Of 
INDICATE TO WRITE 



DATA BtTES 
TO 0MT5TA 



TO BE WRITTEN 



SET PRIORITY 7 TO DISABLE THE CLOCK 



SET THE ERROR NUMBER TO 4405 
SELECT THE MESSAGE, 

"HOST FAILURE. WRITE FAILED TO AN ADDR WHICH 
HAD BEEN SUCCESSFULLY READ. TEST ABANDONED " 



PERFORM THE TRANSFER 
EXIT IF HOST FAILURE 
AND REPORT ERROR. 
SELECT THE LOWER DMA 
SELECT THE NEXT DATA 
PERFORM THE TRANSFER 
EXIT IF HOST FAILURE 



TEST ADDR 
PATTERN 



J SET UP THE DHU TO PERFORM THE DMA. 
I - 

I SET INTERNAL LOOPBACK. ENABLE THE RECIEVER FUNCTION ON THE LINE. 

t SET THE LPR ON THE LINE TO 5ft. 4I< BAUD. 8 BITS PER CHARACTER, ODD PARITY, 

: 2 STOP BITS. ENABLE THE TRANSMITTER ON THE LINE. 

(SET THE ERRNBR TO 4404 

iFIRST FIND AN ACTIVE LINE ON WHICH TO PERFORM 

; IHE DMA. 

iSAVE THE LINE, NUMBER ON WHICH THE DMA WILL OCCUR 

(SELECT THE MESSAGE, 

i "NO ACTIVE LINES , TEST ABANDONED" 

iEXiT IF A LINE COULD NOT BE FOUND .AFTER flRST 

iRfcSrORING TH^ CONTENTS OF MEMORY. 

jRtSTORE THE ACTIVE LINE NUMBER. 



1 - 



000600 



18* 



20$ 



INC 
JSR 


ERRNBR 

PC.FINACT 


MOV 
MOV 


Rl,R2 
<>EM4404.R1 


BCS 
JMP 

MOV 


. •6 
50$ 
R2.R1 


IVE LINE HAS BEEN FOUND 


MOV 
JSR 

MOV 
JSR 
JSR 


^>204,R0 

PCWTWLNC 

«1776/O.RO 

PCWTWIPR 

PC.TXENBL 


TE THE 


DMA 


MOV 
MOV 
MOV 
MOV 


0DTsrA.R5 

dSDPBAS,R4 

Rl,80$ 

^2.70$ 


MOV 
CI R 
MOV 
ASL 


«5?.R0 
R3 

»b.R2 
R5 



iPASS THE LNCTRL CONTENTS 
(INITIALISE THE LNCTRL REGISTER 
tPASS THE LPR CONTENTS 
; INITIALISE THE LPR REGISTER 
iENABLE TRANSMITTER ON THE LINE 



iSTART FROM THE HIGHER OF THE PAIR OF ADDR 
I SET L>P THE ADDR OF THE DATA PATTERN 
iSAVE THE LINE NUMPER FOR THE DMA 
J INITIALISE THE LOOP COUNT 



,St T W THE LSB' S 
iCl \ AR THF REG THAT 
iCONVt-RT THE OMTSTA 
jA PHYSICAL ADDRESS 



Ull I HOLD THE 6 MSB" S 

INTO 

WITH 



OHU-ll fUNC TST 

HARDWARt. rts^ 



PARTfl 



Klb 
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- DMAADR - 



^EQ 205 



7959 
7960 
7 "^61 
7962 
7965 
7964 
7965 
7966 
7967 
7968 
7*^69 
7970 
79/1 
7^* /J 
797,^ 
7974 
7975 

79 /e 

79// 
7978 
7979 
7980 
7981 
798^-^ 
7983 
7984 
7985 
7986 
7987 

y^m 

7989 

7990 
7991 
799i^ 
799;^ 
7994 
7995 
7996 
799 / 
7998 
7999 
8000 
8001 
800:^ 
800.^ 
8004 
M005 
o006 
800/ 
8008 
8009 
8010 
80U 
801,-? 
801^ 
8014 

80i:i 



0S3106 
055110 
05511^ 
055114 
055120 
033122 
055126 
053150 



055142 
033150 



035154 
033160 

055162 
055170 
053174 



055200 
055204 



033214 
033220 



033226 
053250 
055254 
033240 



055242 
053244 

055250 
033256 



055262 
055266 

0552/0 
0552/4 
0532 ''6 
033300 



006103 
005302 
001374 
032705 
001402 
012 700 
060005 
052703 



053154 016777 



012767 
012701 



105777 
100532 

012777 
01057/ 
110377 



012701 

016702 



004767 
012701 



055224 105110 



010402 
012/04 
004/67 
010204 



005005 
012705 

012/6/ 
012/01 



01/ 702 
100067 

012/00 
040200 
001011 
00476/ 



000100 

000025 

000200 

000554 

010465 
010426 

147034 



000020 
14 7016 
147014 



170144 
146770 



055210 OOS267 152102 



173572 
010522 



000005 
164216 



000200 

01046/ 
010576 



146714 
170501 
171254 



22 J 



14 7056 
152146 



ROl. 


R3 


DEC 


R2 


BNt. 


20* 


BIT 


VH00.R5 


Be:a 


22$ 


MOV 


#25. RO 


ADD 


R0,R5 


BIS 


<^200.R3 


MOV 


SOJ.aCSRA 


MOV 


<?4405. .tRRNBR 


MOV 


V?EM4405.R1 



147026 



TSTB aTXAD2A 

BMI 30$ 

MOV tfl6. .aiXBfCA 

MOV R5,aTXA01A 

MOVB R3,aTXAD2A 

! WAIT FOR THE DMA TO COMPLETE 

MOV dl70144,Rl 

MOV C5RA,R2 



THE MSB'S IN REG ^^3, 



TEST BIT i>6 Oi THE DMT5TA 

ALTER THE LSB'S IF BIT i>b WAS SET. 
ADD IN THE LSB'S 
SET BIT ttl, 

SELECT THE LINF ON WHICH TO PERFORM THE DMA. 

SET ERROR NUMBER 4405 
SELECT THE MESSAGE. 

'■ DMA START BIT FOUND SET BEFORE DMA INIT. 
TESl ABANDONED" 
TEST THE OUT DMA-START dIT 
EXIT WITH ERROR IF SET 
THE CONTENTS OF MEMORY 
SET UP CHARACTER COUNT 
SET UP BITS TO 15 Of 
SET UP BITS 16 TO 21 . 



.AFTER FIRST RESTORING 



THE PHYISCAL AOOR. 
AND INITIATE THE DMA. 



AND THE LAST CHARACTER TO BE RECIEVED 

iTEST BIT 15. TIME-OUT Qf 100 MS. 
jPA5S THE ADDR OF THE REG TO TEST, 



INC ERRNBR 

JSR PC.UAIBIS 
MOV *EM4406.R1 



BCC 30$ 



152040 24$: 



MOV 
MOV 
vJSR 
MOV 


R4,R2 
<>5.R4 
PC.OtLAY 
R2.R4 


HE CONTENTS OF THE RX 


CLR 
MOV 


H5 

ttl28. .R5 


MOV 
MO; 


' 10'. .tRRNBR 
<7th4407.Rl 


MOV 
BPl 


a«BUFA,R2 
30$ 


MOV 
HIC 
HNt 
JSR 


i>l /0501.R0 

R2.R0 

28$ 

PC . SAVBMP 



I SET ERROR NUMBER TO 4406 

;WAIT FOR BIT TO SET 

J SELECT THE MESSAGE . 

; ■* TIME-OUT OCCURED WAITING FOR DMA TO 

;COMPLETE. TEST ABANDONED" 

;FXIT IF TIME OUT OCCCL«FO. AFTER i^IRST . 

J RESTORING THE CONTENTS OF MEMORY. 

J SAVE n4 

J SET 5 MS DELAY 

iDELAY TO ALLOW LAST CHARACTER TO BE RECIEVEU 

: RESTORE R4 

IFO AND COMPARE THEM WITH THE CORRECT DATA 

; CLEAR THE READ DATA COL»NTER 
iSf-T rn^ MAX BMP CODE READ COUNT 

tSET THE ERRNBR TO 440 7 

; SELECT THE MESSAGE . 

i " RXriFO EMPTY TOO SOON, DMA FAILED 

iTEST ABANDONED" 

(READ THE CHARACTER FROM THE T IFO 

[BRANCH TO REPORT ERROR IF FIFO EMPTY TOO SOON, 

(AFTER FIRST RFSTORINC. IHh CnNTENTS OF MtMOKt . 

(SM U' HIT MASK OF A BMP CODE 

jTRi TO CLEAR THE BMP CODE MASK 

t BRANCH IF NOT A HMP CODE 

iSAVt: THE BMP CODF ON THE QUEUE 



DNUU yVUC 1ST 
HARDWARt TKST 



PART4 MACRO 



Mlc^OO 15 MAR 84 09:48 
- DMAAUR - 



Lib 



PAGE 1.^4-5 



SEQ 206 



8016 

aor; 

8018 
8019 
80^0 
80? 1 
80^^ 

8024 
8025 
80?f. 
80? 7 
8028 
80^1 
8050 
8051 
803? 
8035 
8054 
8035 
8056 
8057 
8038 
8059 
8040 
8041 
804? 
8045 
8044 
8045 
8046 

804 7 
8048 
8049 
80S0 
8051 
805? 
8053 
8054 
8055 
8056 

805 7 
8058 
8059 
8060 
8061 
806? 
8065 
8064 
8065 
8066 
8067 
8068 
806*^ 
80/0 
MO/l 

eo7? 



055504 
033310 



033514 
053516 



0333?? 
055330 
03335? 

053536 
0333A4 
03355? 
033354 
033356 
03536? 
033364 
055570 
03337? 
033576 
053400 
033404 

035410 
055416 



035430 
055454 

035436 

033440 



055446 
055454 
03546? 
033466 
0534/? 
0354/6 
05550? 
055506 
033510 

053516 
0335?? 



005?67 
012701 



005305 
0014S5 



15?006 
010660 



0553?0 000753 



01? 767 
010?01 
01?7C? 

01?767 
Cl?767 
1??401 
0010:4 
00506 . 
005?03 
0??703 
0013^7 
005567 
0014?0 
01?704 
016705 

01?767 
01?701 



0554?? 01?767 



004 767 
103004 

000615 

012767 



016767 
016/67 
01? /OO 

01?705 
Ol?703 
004 767 
00576 7 
OOlOl? 
016767 

01? 700 
004 767 



010471 15176b 28$; 

01O7?5 

015444 151756 
177777 00033? 

0003?? 

oono?o 

000?74 

005154 
14661? 

01047? 151700 
010760 

01405? 151672 

167214 



000001 000236 ?9$: 



INC 


ERRNBR 


MOV 


0EM4408,R1 


DEC 


R5 


BEQ 


3C$ 


BR 


24$ 


MOV 


^4409. .ERRNBR 


MOV 


R?.R1 


MOV 


<>EM4409,R? 


MOV 


0ER9101,ERRBLI< 


MOV 


«-l.SUCS5 


CMPB 


CR4)*.R1 


BNE 


50$ 


CLR 


SUCSS 


INC 


R5 


CMP 


«16. .R3 


BNE 


?4$ 


DEC 


70$ 


8EQ 


?9$ 


MOV 


dSDP?B,R4 


MOV 


DMTSTA,R5 


MOV 


04410. , ERRNBR 


MOV 


OEM4410.R1 


MOV 


*ER0503,ERRBL'< 


JSR 


PC.PUKIKO 


BCC 


30$ 


BR 


18$ 


MOV 


V>1, SUCSS 



I SET THE ERRNBR TO 4408 

; SELECT THE MESSAGE, 

t " TOO MANY BMP CODES FOUND IN THE RXEIFQ. 

{TEST ABANDONED" 

I DEC THE MAX BMP CODE READ COUNT 
J GO REPORT ERROR IF TOO MANY BMP CUOES ^ OUND , 
: AFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
;DON'T COUNT THE BMP CODE AS A VALID CHARACTER 

J SET THE ERRNBF, TO 4409 

I SAVE THE CHARACTER FROM THE FIFO 

1 SELECT THE MESSAGE . 

I " BAD BIT BETWEEN BITS AND " 

; SELECT THE ERROR ROUTINE. 

(INDICATE 'BAD BITS' FAILURE 

J COMPARE CHAR FROM KIFO WITH THE CORRECr DATA. 

[BRANCH IF INCORRECT AND RESTORE MEM CONT'S. 

(INDICATE NON TEST SPECIFIC FAILURE E.G. TIME 

(COUNT THIS CHARACTER. 

(HAVE WE RECIEVED ALL THE CHARACTERS ? 

(LOOP UNTIL ALL CHARACTERS (NON-BMP) ARE READ. 

(DECREMENT THE LOOP COUNT 

(BRANCH IF BOTH DMA'S ARE COMPLETED 

(SET UP THE SECOND DATA PATTERN 

(SET UP THE OTHER DMA TEST ADDRESS 

(SET ERRNBR TO 4410 

(SELECT THE MESSAGE . 

( " RXFIFO FAILED TO PURGE. TEST ABANDONED '* 

(SELECT THE ERROR ROUTINE 

(PURGE THE RXf- IFO 

(EXIT WITH ERROR IF FIFO WOULD NOT PURGE , 
(AFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
(OTHERWISE REPEAT. 

(INDICATE THAT WE HAVE BEEN ABLE TO TEST, 
(SOME OF THE BITS. 



OUTS 



RESTORE THE ORIGINAL DATA IN THE MEMORY 



146550 000??4 

000??? 146540 

00360? 

000001 

0000?0 

164066 

146546 

0001:4 146504 

004. :o..' 
16404? 



50$: 



MOV 


OMTSTA.OUMY 


MOV 


ODTSTA.DMTSTA 


MOV 


OBUf HAS.RO 


MOV 


^l.HS 


MOV 


016. .R5 


JSR 


PC.OMRW 


TST 


TP4FI.G 


BNE 


511 


MOV 


DUMt .DMTSTA 


MOV 


OBvfMID.RO 


JSR 


PC.OMRW 



(START WITH THE HIGHER OF THE PAIR OF 



OF 



CDMTSTA) 



(POINT AT THE START 
tSELECl WRITE TO 
(PASS NUMBER OF BYTES 
[RtSlORE \Hh DATA 
[GO REPOR; ERROR IF A 

; 

(NOW RE-'TORt THE DATA FROM JHE 
jOF THF P.UR OF IE5T ADDHt SSF S . 
(POINT AT THE START OF THE SAVED 
(RESTORE Tr'-: DATA 



DMTSTA 
AREA 



THE SAVED DATA 
TO BE WRIlTEN 
TRAP OCCUREO 

L OWER 

DATA AREA 



KA 'I / 



DHU 11 t-UNC 1ST PARTO 

rardwarf: tfst 



Mlb 
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SEQ 207 



80V3 
8074 
80/5 
8076 
807? 
807a 
80 79 
8080 
8081 
8082 
8085 
8084 
808'3 
8086 
8087 
8088 
8089 
8090 
8091 
6092 
8093 
8094 
8095 
8096 
8097 

8098 
8099 
8100 
8101 



0335f?6 
033532 

033554 
033543 



033546 
033554 



8102 
HI 03 
8104 

8105 



8106 
8107 
HIGH 
6109 



8110 

bin 

6112 
8113 
8114 
8115 
H116 
8117 



035556 
033562 
033564 
033570 
033572 
033600 



033602 
033610 
033612 
033614 
033616 
033616 
033620 
033622 
033626 
035632 
035634 
033636 
033642 

053644 
033644 
033646 
033646 
05565? 
033654 
033662 

033666 
035666 
033670 



033672 
0336 74 
0356 .^6 
055700 
033702 



005767 
0014U 

012767 
012701 



012767 
000433 



005767 
001430 
016701 
005301 
02276? 
001021 



032767 
001416 
010102 
005202 

010246 
010146 
012746 
012746 
010600 
104414 
062706 
000401 



146522 



010473 
011007 



151554 31 J: 



014032 151546 



rST TP4F--LG 

BEQ 32* 

MOV <M41i. .ERRNBR 

MOV ^>EM4411.R1 



MOV <?ER0503,ERRBLI< 
BR 34$ 



[GO REPORT ANY ERRORS IF A NO TRAP 
I OCCURED DURING THE RESTORE. 

I SET THE ERROR NUMBER TO 4411 

I SELECT THE MESSAGE , 

1 " HOST FAILURE. WRITE FAILURE TO AN ADDR 

i WHICH HAD PREVIOUSLY BEEN SUCCESSFULLY 

[WRITTEN TO. " 

i SELECT THE ERROR ROUTINE 

I REPORT THE ERROR 



000122 
000106 
000001 



000104 



HAS THE TEST BEEN SUCCESSFUL, PRINT THE BITS TESTED IF IT HAS, 
REPORT THE ERRORS OTHERWISE. 

32$: TST 5UC5S ; IF THE ERROR IS NON TEST SPECIFIC THEN 

I BRANCH TO REPORT ERRORS 
iLOAO THE NUMBER OF BITS TESTED 

iDEC TO GIVE THE BIT POSITION OF THE MSB TESTED. 
ilF THE BITS TESTED ARE BAD THEN 
; BRANCH AND REPORT ERRORS. 

OTHERWISE DETERMINE IF PRINTING OF THE SUCCESSFULLY TESTED BITS WAS REQUESTED. 



TST 


5UC5S 


BEQ 


34 J 


MOV 


BITSTD.Rl 


DEC 


Rl 


CMP 


Ol.SUCSS 


BNE 


34$ 



000040 146352 



BIT *BIT05, OPTION 

BEQ 60$ 

MOV R1.R2 

INC R2 

PRINTB ftEF4401,Rl,R2 



PRINT THE BITS TESTED IF THE SOFTWARE 
OPTION HAS REQUESTED IT 
CALCULATE THE NUMBER OF BITS WHICH HAVE 

BEEN TESTED SUCCESSFULLY . 
(PRINT THE NUMBER OF BITS TESTED MESSSAGE. 



005631 
000003 



000010 



104460 

012700 000240 
104441 

016767 146376 

00506? 146332 



104452 
000016 



000000 
000000 
000000 

oocooo 

000000 



144122 





BR 


60$ 


34$: 


ERROR 




60$: 


SETPRI 


^?PRI05 




MOV 
CI R 


TP-IVf C.4 
CTRI CF 



EXIT 



TST 



iKXTT THE TEST 
( REPORT EHi*ORS 
{ENABLE THE CLOCK 

I Rt: STORE THE NORMm. 004 TRAP VECTOR 
[INDICATE THAT WE ARE NOT WITHIN A TEST 



TRAP 
.WORD 



MOV 


R2. -CSP) 


MOV 


Rl. -CSP) 


MOV 


*eF4401. CSP) 


MOV 


^3. ^CSP) 


MOV 


SP.RO 


TRAP 


CJPNTB 


ADD 


vno.sp 


TRAP 


C$ERROR 


MOV 


i^PRtOS.RO 


TRAP 


CSSPRI 



CtE-.XlT 
L 10050- . 



• ««f4i4*«t«4.**«***4L4A4i* LOCAL VARIBIR AREA t**-*^*^*.*^^**.^**-**-*-*.^*.*^^*^*.****^*-*^ 



/O* : .WORD 

80$: .WORD 

tUTSTU: .WORD 

DHHi ; .WORD 

UDTSTA: .WORD 



[COUNTER hOR THE NUMBER OF DMA' S COMPLETED 

[SAVE ARtA FOR THE ACTIVE LINE NUMBER 

[NUMBhR 01- HITS TESTED 

(DHMMi VARIABLE 

[HIGHER OF THE PAIR OF COMPLEMENTARY ADDR. 



PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 



DOCUMtNT 

;UMENT 
DCCU1F.NT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 



PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM HEADER 
PROGRAM HEADER 
DISPATCH TABLE 



DISPATCH ThBLE 
DEFAULT HARDWARE P-T. 
SOFTWARE P- TABLE 
GLOBAL EQUATES SECTl. 
GLOBAL EQUATES SECTI. 
GLOBAL DATA SECTION . 
GLOBAL DATA SECTION . 
GLOBAL DATA SECTION . 
GLOBAL DATA SECTION . 
GLOBAL DATA SECTION . 
GLOBAL DA I A Si CITON . 
GLOBAL DATA SECIIDN . 
GPR HANDLING ROUTINE . 



GPR FRAME ACCESS LQU. 
GLOBAL MACRO DtFINIT. 

MACRO OEFINIT. 

SUBROUTINE 

TEXT SECTION . 

TEXT SECTION . 

TEXT SECTION . 

TEXT SECTION . 

TEXT SECTION . 

ERROR REPORTI. 



GLC3AL 
GLOBAL 
GLOBAL 
GLOBAL 
GLOBAL 
GLOBAL 
GLOBAL 
GLOBAL 
tiLOBAL 
GLOBAL 
GLOBAL 



ERROR 
ERROR 
ERROR 



REPORTI. 
REPORTI, 
REPORTI. 



. .b: 

;:8: 

. .El 

. .El 

. .Gl 
. .HI 
. .11 
. .Jl 
. .Kl 
. ,L 1 
. .Ml 
. .Nl 



X?. 
.02 

.E^ 

.F2 
.G2 
.H2 

.12 
. J2 
.!<? 

.M2 
.N2 



.83 

.C3 
.03 

.E?; 

.F3 
.G3 
.H3 
.13 
.J3 
.K3 
.L3 

.h; 



.84 

.C4 
.04 
.E4 
.F4 
.G4 
.H4 
.14 
. J4 
.K4 
.14 
.M4 
.N4 



GLOBAL 


ERROR REPORTI. . 


. .85 


GLOBAL 


ERROR REPORTI. . , .C5 


GLOBAL 


ERROR REPORTI 05 


GLOBAL 


ERROR REPORTI E5 


GLOBAL 


ERROR REPORTI F5 


GLOBAL 


ERROR REPORTI G5 


GLOBAL 


ERROR REPORTI H5 


GLOBAL 


ERROR REPORTI 15 


GLOBAL 


ERROR REPORTI J5 


GLOBAL 


ERROR REPORTI I<5 


GLOBAL 


ERROR REPORTI L5 


GLOBAL 


ERROR REPORTI.. . .M5 


GLOBAL 


ERROR REPORTI N5 


GLOBAL 


ERROR REPORTI 86 


GLOBAL 


ERROR REPORTI. 


. .C6 


GLOBAL 


SUBROUTINES S. 


. .06 


GLOBAL 


SUBROUTINE 


. .E6 


GLOBAL 


SUBROUTINE 


. .F6 


GLOBAL 


SUBROUTINE 


. .G6 


GLOBAL 


SUBROUTINE 


. .H6 


GLOBAL 


SUBROUTINE 


. .16 


GLOBAL 


SUBROUTINE 


. .J6 


GLOBAL 


SUBROUTINE 


. ,1<6 


GLOBAL 


SUBROUTINE 


. .L6 


GLOBAL 


SUBROUTINE 


. .M6 


GLOBAL 


SUBROUTINE 


. .N6 


GLOBAL 


SUBROUTINE 


. .B7 


GLOBAL 


SUBROUTINE 


. .CV 


GLOBAL 


SUBROUTINE 


. .07 


GLOBAL 


SUBROUTINE 


. .E7 


GLOBAL 


SUBROUTINE 


. . .F/ 


GLOBAL 


SUBROUTINE 


. . .G7 


GOBAL 


SUBROUTINE 


. . .H7 


GLOBAL 


SUBROUTINE 


. . .17 


GLOBAL 


SUBROUTINE 


. . .J7 


GLOBAL 


SUBROUTINE 


. . .K7 


GLOBAL 


SUBROUTINE 


. . . L 7 


GLOBAL 


SUBROUTINE 


. . .M/ 


GLOBAL 


SUBROUTINE 


. . .N7 


GLOBAL 


SUBROUTINE ... .88 


GLOBAL 


SUBROUTINE 


. . .C6 


GLOBAL 


SUBROUTINE 


. . . OH 


GLOBAL 


SUBROUTINE 


. . .\rS 


GLOBAL 


SUBROUTINE 


. . Ji< 


GLOBAL 


SUBROUTINE 


. . ,GH 


GLOBAL 


SUBROUTINE 


. . .H8 


GLOBAL 


SUBROUTINE 


. . .18 


GLOBAL 


SUBROUTINE 


. . . J8 


GLOBAL 


SUBROUTINE 


. . .K8 


GLOBAL 


SUBROUTINE 


. . .L8 


GLOBAL 


SUBROUTINE 


. . .M8 


GLOBAL 


SUBROUTINE 


. . .N8 



GLOBAL 


SUBROUTINE 


. . .89 


GLOBAL 


SUBROUTINE 


. . .C9 


GLOBAL 


SUBROUTINE 


. ..09 


GLOBAL 


SUBROUTINE 


. . .E9 


GLOBAL 


SUBROUTINE 


. . .F9 


GLOBAL 


SUBROUTINE 


. . .G9 


GLOBAL 


SUBROUTINE 


. . .H9 


GLOBAL 


SUBROUTINE 


. . .19 


GLOBAL 


SUBROUTINE 


)9 


GLOBAL 


SUBROUTINE 


. . .I<9 


GLOBAL 


SUBROUTINE 


. . .L9 


GLOBAL 


SUBROUTINE 


. . .M9 


GLOBAL 


SUBROUTINE 


. . .N9 


GLOBAL 


SUBROUTINE 


. . .810 


GLOBAL 


SUBROUTINE 


. . .CIO 


GLOBAL 


SUBROUTINE 


. . .010 


GLOBAL 


SUBROUTINE 


. . .ElO 


GLOBAL 


SUBROUTINE 


. . .FIO 


GLOBAL 


SUBROUTINE 


. . .GIO 


GLOBAL 


SUBROUTINE 


. . .HIO 


GLOBAL 


SUBKOUTINE 


.. .110 


GLOBAL 


SUBROMTINE 


. . .JIO 


GLOBAL 


SUBROUTINE 


. . .KIO 


GLOBAL 


SUBROUTINE 


. . .LIO 


GLOBAL 


SUBROUTINE 


. . .MIO 


GLOBAL 


SUBROUTINE 


. . .NIC 


GLOBAL 


SUBROUTINE 


. . .Bll 


GLOBAL 


SUBROUTINE 


. . .Cll 


GLOBAL 


SUBROUTINE 


. . .011 


GLOBAL 


SUBROUTINE 


. . .Ell 


GLOBAL 


SUBROUTINE 


. . .Ml 


GLOBAL 


SUBROUTINE 


. . .GU 


GLOBAL 


SUBROUTINE 


. . .HU 


GLOBAL 


SUBROUTINE 


, . .Ill 


GLOBAL 


SieROUTINE 


. . .Jll 


GLOBAL 


SUBROUTINE 


... K 1 1 


GLOBAL 


SUBROUTINE 


. . .LU 


GLOBAL 


SUBROUTINE 


. ..Mil 


GLOBAL 


SUBR0U1 INE 


...NU 


GLOBAL 


SUBROUTINE 


. . .812 


GLOBAL 


SUBROUTINE 


. . .C12 


GLOBAL 


SUBROUTINE 


. . .D12 


GLOBAL 


SUBROUTINE 


. . .E12 


GLOBAL 


SUBROUTINE 


. . .F12 


GLOBAL 


SUBROUTINE 


. . ,Gl? 


GLOBAL 


SUBROUTINE 


. . .H12 


GLOBAL 


SUBROUTINE 


. . .112 


GLOBAL 


SUBROUTINE 


. . . J12 


GLOBAL 


SUBROUTINE 


. . .KIP 


GLOBAL 


SUBROUTINE 


. . .L12 


GLOBAL 


SUaROUilNE 


. . .M12 


GLOBAL 


SUBROUTINE 


. . .N12 



GL03AL 


SUBROUTINE 


. . .813 


GLC3AL 


SUBROUTINE 


. . .C13 


GLOBAL 


SUBROUTINE 


. . .013 


GLOBAL 


SUBROUTINE 


. . .E13 


GLOBAL 


SUBROUTINE 


. . .F15 


GLOBAL 


SUBROUTINE 


. . .G13 


GLOBAL 


SUBROUTINE 


. . .HIS 


GLOBAL 


SUBROUTINE 


. . .113 


GLOBAL 


SUBROUTINE 


. . .J13 


GLOBAL 


SUBROUTINE 


. . .K13 


GLOBAL 


SUBROUTINE 


. . .L13 


GLOBAL 


SUBROUTINE 


. . .M13 


GLOBAL 


SUBROUTINE 


. ..N13 


GLOBAL 


SUBROUTINE 814 


GLOBAL 


SUBROUTINE 


. . .C14 


GLOBAL 


SUBROUTINE 


. . .014 


GLOBAL 


SUBROUTINE 


. . .E14 


INTERRUPT SERVICE RO. 


. . .F14 


INTERRUPT SERVICE RO. 


. . .G14 


INTERRUPT SERVICE RO. 


. , .H14 


TRAP SERVICE ROUTINE. 


. ..114 


GLOBAL 


TRAP SERVICE . 


114 


INTERRUPT SERVICE RO. 


. . .K14 


INTERRUPT SERVICE RO. 


. . .L14 


INTERRUPT SERVICE RO. 


. . .M14 


PROTECTION TABLE 


. . ,N14 


PROTEC 


riLN TABLE 815 


INITIALIZE SECTION . 


. . .C15 


INITIALIZE SECTION . 


. . .015 


INIT^'-' 


.i7F SECTION . 


. . .E15 


INITlr.l 


_I2E SECTION . 


. . .ri5 


AUrODWP SECTION 


. . .G15 


CLEANUP CODING SECTI. 


. . .Hi!j 


DROP LI^UT SECTION 


. . .115 


HARDWARE TEST 


. . .J15 


HARDWARE TEST 


. . .K15 


HARDWARE TEST 


. . .LIS 


HARDWARE TEST 


. . .M15 


HARDWARE TEST 


. . .N15 


HARDWARE TEST 


. . .R16 


HARDWARE TcST 


. . .C16 


HAPOWARt TEST 


. . .ou^ 


HARDWARE TEST 


. . .Lib 


HARDWARE TEST 


. . .( lb 


HARDWARE TEST 


. . .cut) 


HARDWARE TEST 


. . .Hl^ 


HARDWARE TESl 


. . . IU> 


HARDWARE TEST 


Jib 


HARDWARE TEST 


. . .KU> 


HARDWARE TEST 


. . .Lit 


HARDWARE TEST 


. . .M16 



Bl 

DHU-11 FUNC TST PART4 MACRO MISOO 15 -MAR -84 09i4fl PAGE 134-7 SEQ 206 

HARDWARE TEST - DMAADR - 

8118 033704 000000 SUCSSi .WORD .SUCCESS INDICATOR, -1 - ERROR OU. TO BAD BITS 

6119 I 1 - SUCCESSFUL TEST 

8120 I - OTHER ERRORS 

8121 »♦ 

ei2j; ,•»♦♦♦♦♦♦••♦♦*♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦ END ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*********♦•***♦**♦ 

8123 !- 

8124 035706 ENOTST 

033706 L10030: 

033706 104401 TRAP CIETST 



CI 



RHHoiiRi^sf 



ST PART4 



8l?6 
3127 

ei2d 

8129 
8150 
8151 
8132 
8135 
8134 
8135 
8136 
8137 
8138 
8139 
8140 
8141 

8142 
8143 
8144 
8145 
8146 
8147 
6148 
8149 



8150 
8151 
8152 
8153 
8154 
8155 
8156 
8157 
8158 
8159 
8160 
8161 
8162 
6163 
8164 
8165 
8166 
8167 
8168 
8169 



8170 



033710 
033710 



033710 
033716 

033720 
033724 
033724 
033730 
033732 

033740 
033746 
033754 
053762 
055770 
035774 



ain 



034000 
034004 



034006 
054006 

054012 
054014 
054014 
054020 
054024 
054050 
054054 
054056 
034042 



126727 
001402 

000167 

012^00 
104441 
012767 
000005 
012767 
012767 
012767 
012767 
005067 
005067 



^'^FBReffii^^^^ 
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SEQ 209 



146260 000002 

000572 
000240 
177777 



000005 
000001 
014071 
011054 
146504 
146224 



146260 

146312 

151340 
151354 
151330 



004767 163332 
103144 



012700 
104441 

M2746 
012746 
016746 
012746 
104437 

062706 



000340 



000300 
027426 
146140 
000003 

000010 



HARDWARE TEST 



- TRMCRR - 

FRAHING ERROR GENERATION TEST - 

TO VERIFY THE FRAMING ERROR DETECTION CAPABILITIES 



.SBTTL 

\* 
I* 
I* 
I* 
i» 
I* 
I* 
I* 
»♦ 
I* 
»* 
I* 

BGNTST 

T5:! 

TeXECUTE THIS TEST IN STAGGAREO LOOPSACK MODE ONLY. 

CMPB 
BEQ 



THIS TEST IS USED 

OF THE OMUll. 

WfSEN IN STAGGARCO LOOPeACK MOOE, CHARACTERS ARE TRANSMITTED FROM 

a« GROUP OF LINES AT 6 BITS/CHAR. AND RECEIVED lY THE OTHER GROUP 

AT 5 BITS/CHAR. THIS WILL GENERATE A FRAMING ERRO« FOR EACH CHARACTER. 

THIS TEST WILL ONLY EXECUTE IF THE STAGGAREO LOOPBACK MOOE IS SELECTED. 

THE SPECIAL STAGGAREO LOOPB^CK BERG CONNECTOR MUST BE FITTED. 

THE ACTIVE LINES BIT MASK IS USED TO INDICATE WHICH LINES HAVE BEEN 

REMOVED FROM FURTHER TESTING. 



LOPBCK , #2 
.♦6 



JMP 601 
SETPRI #PRI05 



MOV #-l,CTRLCF 

TNUM ■- TNUM ♦ I 

MOV ♦TNUM,TSTNUri 

MOV ♦l.ERRTYP 

MOV •6201..ERRNBR 

MOV •CM6201.CR;mSG 

CUR ERSMRF 

CLR FERROR 



•PRIOS.ftO 
CISPRI 



I CHECK MOOE SELECTED. 

I AVOID EXITING THE TEST IF STAGGERED LOOPBACK 

iMOOE IS SELECTED. 

I EXIT THE TEST. 

(ALLOW LTC INTERRUPTS. 

MOV 
TRAP 

•INDICATE THAT y£ ARE IN A TEST. 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

■SET UP THE TEST NUMBER. (62) 

I SET ERROR TYPE IN ERROR TABLE. 

I SET ThC FIRST ERROR NUr«ER IN ERROR TABLE. 

I SET ERROR MESSAGE AOORESS IN ERROR TABLE. 

I INITIALIZE THE -REPORT ERROR SUMMARY" FLAGS. 

(CLEAR THE "AT LEAST ONE ERROR** INDICATOR. 



TO A KNOWN STATE. REMOVE STATUS COOES FROM THE FIFO. 
RX INTERRUPT ENABLE BITS. 



I RESET THE OUT 
I CLEAR TX AND 
I THIS SUBROUTINE REPORTS ERROR >>>»> 6201 <<<<< 

*" JSR PC.CLNR5T iRESET THE OUT. 
BCC 601 (ABORT THE TEST 

I DISABLE ALL 
( SET UP DMA 

SETPRI ♦PRI07 



IF FATAL ERROR FOUND IN RESET 



INTERRUPTS. 

TX AND RX INTERRUPT 



SERVICE ROUTINES. 



IDISACLE ALL INTERRUPTS. 



SE TVEC TXVECA , #TXDMA, ♦PRI06 



(SELECT DMA TX INT 



SETPRX #PR104 



(ALLOW INTERRUPTS. 



MOV 
TRAP 
SERVICE RTN. 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 



•pr:o7,ro 

CtSPRI 

♦PRI06.-(SP) 
♦TXOMA. (SP) 
TXVECA, -CSP> 
♦5. (SP) 
CtSVEC 

no.sp 



Dl 



RBWdWrI^S^ST PART4 MApgfl^^aOO 



83385I mn 



8172 
8175 
8*74 

8175 054050 

8176 034054 

8177 034060 
8178 

8179 

8180 

8161 

8182 

8165 034064 

8164 034070 

8185 034074 

8166 

8187 

8168 

6189 

6190 

8191 034100 

819? 034104 

8193 034110 

8194 034114 
6195 034120 

8196 034124 

8197 034130 
8198 

8199 
6200 
6201 
8202 
6203 
8204 
6205 034134 

8206 034140 

8207 034144 
6208 034146 

8209 054154 

8210 034160 
6211 

6212 

8215 

8214 034164 

6215 

6216 034170 

6217 034174 

6218 034176 

6219 034204 
8220 

6221 
6222 
8225 

8224 054206 

8225 054210 

8226 034214 



005067 
005067 
005067 



012700 
004767 
005067 



012700 
012701 
004767 
012702 
012705 
016''04 
004767 



005267 

004767 
103064 
012767 
004767 
012705 



004767 

005767 
001404 
032767 
001436 



005104 
004 767 
005267 



000200 



146426 
146424 
146200 



005502 
165264 
147502 



156470 
156440 
164422 
003602 
000001 
146106 
163726 



151156 

166566 

014075 
171544 
100000 



162546 
146050 
OOOIOO 



165646 
151076 
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I ♦ 



SEQ 210 



151142 



145756 



m? nwi'^'' 



I CLEAR TX. RX. AND DMA. START ERROR FLAGS. 



t - 



CLR TXDONF 
CLR RXOONF 
CLR TXINTF 



I CLEAR TX DONE FLAGS FOR ALL LINES. 
I CLEAR RX DONE FLAGS FOR ALL LINES. 
I CLEAR TX ERROR FLAGS FOR ALL LINES 



I SET UP ERROR TABLE AND DATA PATTERN TABLE. 

I THE NUMERICAL VALUE OF THE CHARACTER INDICATES THE NUMBER OF THE LINE 

I THAT TRANSMITTED IT. 

I - 



MOV #ERCNTB,RO 
JSR PC,CLR16W 
CLR BUFBAS 



I PASS THE ADDRESS OF THE TABLE TO BE CLEARED 
I CLEAR THE RX ERROR COUNTERS TABLE. 
I SET SINGLE CHAR DATA TO BE A NULL. 



I INITIALISE DMA PARAMETEMC IN THE CONTRX BLOCK. 

I TRANSMISSION ON LINE GWXJP I AT 6 BITS/CHAR. 1 STOP BITS. ODD PARITY. 

I RECEPTION ON LINE GROUP 2 AT 5 BITS/CHAR, 1 STOP » 000 PARITY. 

I ■ 



MOV #1564 70, RO 

MOV •156440, Rl 

JSR PC.GETTIM 

MOV •eUFBAS.R2 

MOV n,R5 

MOV LGItPlH,R4 

JSR PCFRPSUP 



tPASS LPR PARAMETER FOR 6 BITS/CHAR. 

I PASS LPR PARAMETER FOR 5 BITS/CHAR. 

iGET TIME-OUT BASED ON MII4IMUM BAUORATE IN USE. 

iPASS START ADORCSS OF DATA PATTERN. 

I PASS LENGTH OF DATA PATTERN. 

I PASS LINE GROUP OF LINES THAT ARE TO TX. 

I SET UP OUT FOR TRANSMISSION ANO RECEPTION. 



I ♦ 

I 

I 

I 

1 

I - 



PURGE THE FIFO OF ANY UN-MANTEO CHARACTERS. THIS ROUTINE REPORTS ERRORS 
WITH WITH ERROR NUMBERS FROM >>>>> 6202 THRU 6204 <<<<<. 

PERFORM TRANSMISSION AND RECEPTION AT 9600 BAUD. 
REPORT ANY ERRORS FOUND, IE. FRAMING ERROR BIT CLEAR OR PARITY ERROR SET 



INC ERRNBR 

JSR PCPUFIFR 

BCC 601 

MOV #6205. .ERRNBR 

JSR PCTXFRPfl 

MOV #100000. R5 



I SET THE ERROR REPORT NUMBER TO 6202. 

laEAN OUT THE FIFO. 

I ABORT THIS TEST IF FIFO WOULD NOT PURC-E , 

I SET THE ERROR NUMBER TO 6205. 

iTX DATA PATTERN ON SELECTED ACTIVE LINES. 

I PASS FRAMING ERROR TEST FLAG. 



I ♦ 
I 
I ■ 



THIS SUBROUTINE REPORTS ERROR NUMBER >>>>> 6205 <<<<<. 

JSR PC.CKFRPR I READ CHARACTERS, REPORT ANY ERRORS FOUND. 



TST TERROR 

BEQ 2« 

BIT #6IT06, OPTION 

BEQ 54$ 



I HAS AN ERROR 
iBRANCH IF NO 
I HAS EKTENDED 
■BRANCH IF IT 
I TEST FAILURE 



BE'iN DETECTED? 

ERROR 

ERROR REPORTING BEEN E^eL'D? 

HASN'T ANO EXIT THE TEST. THE 

MESSAGE HAS BEEN PRINTED. 



I ♦ 



I REVERSE TRANSHISSION/RECEPTION ROLES ON ML'.. ACTIVE LINES. AND REPEAT TEST. 



21: 



COM 


R4 


JSR 


PC.FHPSUP 


INC 


ERRNBR 



iREVERSE ROLES ""OR TRANSMISSION AND RECEPTION, 
I SET UP OUT FOR TRANSMISSION AND RECEPTION, 
(SET ERROR NUMBER TO 6206, 



El 



DHU-ll FUNC 1ST PART4 
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- FRMERR - 



8227 

8228 

8229 

8250 

8251 

8252 

8255 

8254 

8235 

8256 

8237 

8258 

8259 

8240 

8241 

8242 

8245 

8244 

8245 

8246 

8247 

8248 

8249 

8250 

8251 

8252 

8255 

8254 

8255 

8256 



3257 



8258 
8259 

8260 
8261 



054220 
054224 
054226 
054254 
034240 



004767 
105054 
012767 
004767 
012705 



054244 004767 



054250 
054254 
054256 
054264 



005767 
001404 
052767 
001406 



166506 

014101 151062 

171264 

100000 



16246*^ 
145750 
000100 145676 



054266 005267 151024 



054272 
054276 

054502 
054502 
054506 
054510 
054510 
054514 



054522 
054522 
054322 



004767 
004767 



012700 
104441 

016700 
104456 



054516 005067 



171322 
171744 



000540 
145654 
145o76 



I* THIS ROUTNE REPORTS ERRORS WITH NUMBERS >>>>> 6206 THRU 6208 <<<<<. 

JSR PCPUFIFR iCLEAN OUT THE FIFO. 

BCC 60» I ABORT THIS TEST IF FIFO WOULD NOT PURGE. 

MOV #6'^U9.,ERRNBR iSET ERROR NUMBER TO 6209. 

JSR "".TX-'RPR iTX DATA PATTERN ON SELECTED ACTIVE LINES. 

MOV #iOe^>0,R5 iPASS FRAMING ERROR TEST FLAG. 

I THIS SUBROUTING REi^ORTS ERRORS >>>>> 6209 <<<<<. 
i- 



41 

I ♦ 
1 
I 
1 

• 



54$ 



60$ 



JSR PC.CKr'^PR 

TST FERRC*". 

BEQ 41 

BIT #61106. C^'TiON 

BEQ 541 



INC ERRNBR 



(READ CHARACTERS. REPORT ANY ERRORS FOUND. 

I HAS AN ERROR BEEN DETECTED? 

I BRANCH IF NO ERROR 

I HAS EXTENDED ERROR REPORTING BEEN ENBL'D? 

iBRANCH IF IT HASN'T AND EXIT THE TEST. THE 

(TEST FAILURE MESSAGE f^AS BEEN PRINTED. 

I SET ERROR NUMBER TO 6210. 



DISABLE INTERRUPTS. 
aEAR THE INTERRUPT VECTORS. 

UPDATE THE ACTIVE LINES BIT MAP TO REFLECT LINES REMOVED FROM TESTING. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 6210 THRU 6212 <<<<<. 



JSR 
JSR 

SETPRI 

CLRVEC 



PC.TXIEO 

PC.TXRREP 

♦PRI07 



TXVECA 



CLR CTRLCF 
ENOTST 



104401 



I DISABLE ALL TX INTERRUPTS. 
iREPORT FINAL ERRORS FROM TX/RX. 

iDISABLE ALL INTERRUPTS. 

MOV 
TRAP 

I RETURN TX INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 

iINOICATt THAT WE ARE NOT WITHIN A TEST, 

L10031; 

TRAP C$ETST 



SEQ 211 



#PRI07.R0 
CISPRI 

TXVECA, RO 
C»CVEC 



Fl 



DHU-11 FUNC 


TST 


PART 4 


MACRO 


H1200 


15 


-HAR-84 


HARDWARE 


TtST 




- PARERR - 






8263 














.SBTTl 


8264 














I * *4>** 


8265 
















8266 
















8267 
















8268 
















8269 
















8270 
















8271 
















8272 
















8273 
















8274 
















8275 
















8276 
8277 
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SEQ 212 



8278 
8279 

8280 
8281 
8282 
8283 
8284 
6285 
8286 
8287 
8288 



8289 
8290 
8291 
8292 
6293 
8294 
8295 
6296 
8297 
8298 
8299 
8300 
8301 
8302 
8303 
6304 
8305 
6306 
8307 
8308 



8309 



034324 
034324 



034324 
034332 



126727 
001402 



034334 000167 



034340 
034340 
034344 
034346 

034354 
034362 
034370 
034376 
034404 
034410 



012700 
104441 
012767 
000006 
012767 
012767 
0127'^"' 
0127t>7 
005067 
005067 



034)14 
034420 



034422 
034422 
054426 
054430 
054430 
034434 
034A40 
054444 
034450 



004 767 
103165 



012700 
104441 

012746 
012746 
016746 

012746 
104457 



145644 

000434 

000240 
177777 

000006 
000001 
014235 
011115 
146070 
145610 



000002 



162716 



OO0340 



000300 
027426 
145524 
000003 



145644 

145676 
150724 
150720 
150714 



HAROWARF. TEST - PARERR - 

- PARITY cRROR GENERATION TEST - 

THIS TEST IS USED TO VERIFY THE PARITY ERROR DETECTION AND REPORT 

CAPABILITIES OF THE OUT . 

WHEN STAGCAREO LOOPBACK HOOE IS SELECTED. DATA IS TRANSMITTED 

ON ALL ACTIVE LINES IN LINE GROUP 1 WITH ODD PARITY SELECTED. 

AND RECEIVED ON LINES IN GROUP 2 WITH EVEN PARITY SELECTED. 

THIS WILL GEtCRATE A PARITY ERROR FOR EACH CHARACTER RECEIVED. 

THE PARITY SELECTION IS THEN REVERSED ON THE LINES IN EACH GROUP 

AND THE TEST IS REPEATED. 

THIS TEST WILL ONLY EXECUTE IF THE STAGCAREO LOOPBACK MODE IS SELECTED. 

THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED, 

BGN'ST 



T6i! 



J EXECUTE THIS TEST IN 

CMPB LOP6CK,#2 
BEQ . »6 



STAGGARED LOOPBACK MODE ONLY. 



JMP 



001 



SETPRI *PRI05 



MOV 

TNUM -i 

MOV 

MOV 

MOV 

MOV 

CLR 

CLR 

» RESET THE OUT 
1 CLEAR TX AND 



#-l,CTRLCF 
I TNUM ♦ I 
♦TNUM.TSTNUM 
♦l.ERWTYP 
•6501. .ERRNBR 
#EM650l,ERRMSG 
ERSMRF 
FERROR 



I CHECK MODE SELECTED. 

I AVOID EXITING THE TEST IF STAGGERED LOOPBACK 

iMODE IS SELECTED. 

I EXIT THE TEST. 

I ALLOW LTC INTERRUPTS. 

MOV ♦PRI05,R0 

TRAP C$SPRI 

■INDICATE THAT WE ARE IN A TEST. 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER, 

iSET UP THE TEST NUMBER. C63) 

I SET ERRO« TYPE IN ERROR T^BLE. 

I SET THE FIRST ERROR NUMBER IN ERi^OR TABLE. 

I SET ERROR MESSAGE AOOPESS IN ERROR TABLE. 

iINIT'-ALiZE THE "REPORT ERROR SUMMARY" FLAGS. 

iCLEAR THE "AT LEAST ONE ERROR" INDICATOR 



I THIS SUBROUTINE REPORTS ERROR 

JSR PC.CLNRST 

BCC 601 



TO A KNOWN STATE, REMOVE STATUS COOES FROM THE FIFO. 
RX INTERRUPT ENABLE BITS. 

>v> >> 6301 <<<<<, 



ir^t^SET THE OUT. 

lABWn THT TEST IF FATAL ERROR FOUND IN RESET. 



I ♦ 
I 



DISABLE ALL 
SET UP DMA 



INTERRUPTS 

TX AND RX INTERRUPT SERVICE ROUTINES. 



SETPRI *PRI07 



SETVEC TXVECA.«TXDMA,<>PRI06 



DISABLE ALL INTERRUPTS. 

MOV 
TRAP 
iSELECT DMA Tx INT SERVICE RTN. 

MOV 
MOV 
MOV 
MOV 
TRAP 



•PRI07,R0 
OSPRI 

♦PRI06.-(SP) 
• rxOMA. -(SP) 
TXVECA, -CSP) 
05. -(SP) 
C^SVEC 



DHU-11 TUNC TST PART4 
HARDWARE TEST 



MACRO M1200 



»ERR 



8310 



85i: 
8312 
8515 
8314 
8315 
851^ 
85i: 
8316 

83^0 
83?l 
83^^ 

ft?::5 

8?P4 

8526 
8527 
8328 
8529 

8350 
8551 
8552 
8555 
85 M 

ir55; 
M ,', < --) 

M U 1 

K'.'.4 
8-:4V. 
H54^. 
M ,^4 .' 
M54H 

8 5^j1 
85:.>/ 

MV,4 
«5^jS 

:-"/,'* 



054452 
034456 
054456 
034462 



054464 
034470 
0344 74 



034 SOO 
034504 



054510 
034514 
034520 
054524 

054550 
054554 
054540 



U54:)44 
054SSO 
05455c' 
0545*-.0 
054564 



062706 

012700 
104441 



005067 
005067 
005067 



012700 
004767 



012 700 
012701 

004 ;6 • 

012 702 
012705 
01H,'04 
004 767 



C04/*->/ 
U'51U 

Ul/ <'*.7 

004 >, ; 

005005 



054S»>». 0O4/*. / 



0545// 
0545/*. 

o54t>i:io 

034*:)0*. 



00'- ■*; / 

001404 

O^'/b/ 

oo:4s/ 



000010 
000200 



146012 
146010 
145564 



005502 
162650 



1564 70 
1565/0 
164012 
005 1 54 
000020 
14S4 ;». 
165516 



1661f>2 

014. '41 
164030 



14S4.'^ 
000 I 00 



054610 005u»6:' ISO^OJ 
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SETPRI ;;rPT04 



1 • 

1 CLEAR TX/R< FLAGS. 

CLf. TXOONF 

an RxooNf 

CLR TXINTr 

SET UP ERROR COUNTER TABLE. 

MOV *ERCNTB,R0 

JSR PC.CLR16W 



SEQ 213 



I ALLOW INTERRUPTS. 



ADD 

MOV 
TRAP 



*>10,SP 

dPRI04,R0 
CJSPRI 



jCLEAR TX DONE FLAGS FOR ALL LINES. 
(CLEAR RX DONE FLAGS FOR ALL LINES. 
(CLEAR TX ERROR FLAGS FOR ALL LINES. 



jPASS THE ADDRESS OF THF TABLt TQ BE CLEARED 
iCLEAR THE RX ERROR COUNTERS TABLE. 



INUIALISL DMA PARAMeiERS IN THF CONTROL BLOCK. 



MOV 


«1564 70,R0 


MOV 


0156570. Ml 


JSR 


PC.GETTIM 


MOV 


OS0P2B.R2 


MOV 


016. ,R5 


MOV 


LGRP1M,R4 


JSR 


PC.fRPSUP 



(PASS LPR PARAMETER WITH ODD PARITf. 

iPASS LPR PARAMETER WITH EVEN PARITY 

(GET TIME OUT BASED ON MINIMUM BAUORATE IN USE 

[PASS START ADDRESS OF DATA PATTERN. 

;PMSS LENGTH Of DATA PATTfRN. 

;PASS BIT MAP OF LINE-. TQ BE St T WIlH ODD PAR. 

iSFT \JP OUT rOR TRANSMISSION AND RECEPTION. 



PURU THF yUO Uf ANt UN WANTeO CHARACHRh. 

PERrORH TRANSMISSION AND RECEPTION Ok THe 16 BrTt DATA »'ATTFRN AT <*600 BAUD. 
( TRANSMISSION ON LINE IN GROLtP I, 8 BITS^ChAR, 1 STOP BITS. ODD PARITY. 
RECEPTION ON i I?^S IN GROUP 2 AT fl BITS/CHAR. 1 STOP. FVEN PARITt. 
REMOVE CHARACTERS f ROM THf f if AND LOOK FOR THE PARITi ERROR BIT BtlNti \[.r 
REPORT ANY ERRORS f"OL»NO, Tf . KRAMMINli ERROR BIT SET OR PARlTl ERROR CLEAR. 



THIS HOiiriNL REPORTS ERRORS WITH Ni,fMBt Rs >.>>^ ^■'.Ot' THRU t^504 <.<<*. 



150556 



JSW PC .*■' '» U W 

HCC tO\ 

f^{)\' fff,^o".. J WMNBR 

JM PC.INinMA 



;Cl LAN U'M iMt y IM). 

jABORT THIS TtM IF f'HO UOULO NCM Pi 'fH.E . 

;S( 1 EHROR NUMBER V.) r>50S 

;rx [■)AU\ PATTERN ON Alt ACTIVE IINLS. 

:PA'.'> PAiUT> ERROR TL'>T M Al» . 



THIS SUHHD'JTINI MH-'JRI'- t HRUR NL-MBER 



% ■» \ ^ (i 50' ' V < ■. < < _ 



145554 



JS^v 

'■,1 
11 : : 



INC 



PC 



t RPR 



f \ MPiH.' 

2J 

OBI IOf,,ilPI ION 
'%4J 



^ RRNtlR 



J RE AD CHARACTERS, REPORT ^Nl ERRORS KOUNL). 

iHA^ AN ERWOH BetN KK'ND ;' 

jDWANCh ro CONTlNLtE U TT mA-^N I . 

J HAS EXTENl"^fD ERROR REPORIINL. BK N RUVjt-'t'^ 

(i ^M TMt TFSl K IT HASN '. THfc flST I- AIL. 'PL 

;MtssAu( HAS AlRfADi BM N REPORTED. 

; ,1 ' \ RRUR Nl'MBt R '0 ^ <0t. . 



!His SUtiWUUUNE HtHLUlh EHi-URi WllH NUMBLHS v^i^* 6306 THHU to50^ w^^v 



OHL' 1 , i UNO ISl PART^ MAC 
HAmiuARt U ST ■ P 



UO MK^OO IS MAR m 0V»;4H PAtiK Mh .' 



•^.tO ^14 



85by 
t^5 '0 
85. T 

8:<."> 

8.^;t. 
8/. ■ • 

85 78 
8 5 >» 
8580 

8 581 

8 58.:" 
858;' 
8584 

858 • 
858H 
858^» 
85*^*0 
8 5**1 
8M,^ 

8 544 
8f^*S 

M5'*r. 

H ^< J ; 

8 5**8 
H'. i'* 
H400 
8401 
840/ 
840'. 
84o4 
M40'. 
840*^ 
840/ 
84 OH 
M40'* 
M4i0 



8411 



84 1 '■ 



054M4 
054h?0 

C34b.^b 
034654 



054t^5b 
054^44 
054b SO 
0546S4 



054f.it.O 
05466^ 



054f:)bb 
0546 '.'? 
0546/4 
054 70a 



054 :ot^ 
054 ;K' 
54 'lb 
054 ;.^o 
054,'Pb 



004 /b / 
00S7b; 
001404 
05.V6 7 
00 14 S 7 



0U^7b; 
OOSOb .' 
OOSOb .' 
0OS0b7 



O0S1O4 
004 7b 7 



004 76 ' 
105040 
OK'.'b'' 
004 767 



004 7 r.; 

005 .'»> I 
00M04 
05.\'r ; 
00140.' 



i;i4.v, 

14S400 

000100 14S5.-V^ 



014.^4f- 1S04S.' 
14Sb5.' 
14Sb^0 
14S404 



165174 



16b040 

014 ^!.0 1.50414 
163706 



lb,'0.'4 
14S50b 

000100 14S,>54 



4$ 



JSR PC. TXRRFP 

T'>' FeHROU 

HKJ 4$ 

Mil V>H I T06, OPTION 

Bt.U 605 



MUV «6510. .LRRNBR 

Cl W TXDONf 

Cl.R RXD0N^ 

CI R TXINTF' 



jREPORT riNAl ERRORS f ROM TX/RX. 

J HAS AN ERROR BtEN FOUND 7 

[BRANCH TO CONTINUE IF' IT HASN'T. 

(HAS FXTENOED ERROR REPORTING BFEN REQUFSirO ? 

(EXIT THE TEST IF IT HASN'T. THE TFST EAILURt 

(MESSAGE HAS ALREAOf BEEN REPORTEO. 

tSET ERROR NUMBER TO 6510. 
CI EAh) TX DONE FLAGS FOR All. LINES. 
Cl EAR RX DONE FLAGS TOR All I TNES. 
CLEAR TX DMA HANDOVER ERROR FLAGS. 



REVERSE TRANSMISSION/RECEPTION ROLFS ON All. ACTIVE LINES. AND RFPrAT TFS^^ 



COM 
JSR 



R4 
PC.FRPSUP 



(REVERSE ROLES FOR TRANSMISSION AND HECLPIION. 
(SET UP OUT FOR TRANSMISSION AND RLCF PTlUN, 



THIS ROUTINE REPORTS FRRORS WITH MUMBERS >^>^> 6510 THRU 6^.11 < < < < ^ . 



JSR PC.PUEIFR 

»CC 60$ 

MOV ©65i:\ ,ERRN8R 

JSR PC.INIDMA 



jCl EAN OUT THE f lEO. 

(ABORT THIS TEST IF FIFO WOULD NU I PURGF . 

(SET ERROR Nl^fflFR TO 651.\ 

;TX DATA PATTERN ON SElFCTFD ACTIVF LINE'.. 



THIS SUBROUTINE REPORTS ERROf^S WITH NUMBERS >^^>> 651.'^ THRU 6516 <^<<<. 



054/30 01^767 Ol4aSS 1S0560 bS 



054 756 004 767 1 706S6 



54 74 J 004 767 



U54 /4b 
54 •4b 
054 /'u' 
0'i4 •S4 
54 /S4 
054/60 



01.' /^'O 
10444 1 

01». /oo 

1044 56 



1/1500 
000 540 
14Sc:10 



.4$ 



Uid *'o^ Oli.' '^'t 7 i}iajt,X iSu Aw-ii 



JSR 

TST 
HFiJ 

HIT 
BEO 



MOV 



PC.CivF RPR 

i FRROR 

bJ 

<>BIT06, OPTION 

S4$ 



(READ CHARACTERS, REPORT ANi ERRORS FOUND. 

(HAS AN ERROR BEEN FOUND ? 

(BRANCH TO CONTINUt IF It HASN'T. 

(HAS EXTENDED ERROR REPORTING) BE t N REQUFSIF;? 7 

jFxII THE TfST IF IT HASN'T. THf TFST EAlLUR''t 

jMESSAGf HAS AlHf-AOi HEF N REPORTED. 



Ob51 /. .FRRNHR (SET FRRUH NUMBER TO 65W. 



OlSAHl t lNTtRRi4>T',. 

Cl F AH THF INTFRRL^PT VFCIDR'.. 

UPDAU THE ACTIVF iTNFS BIT MAP Tii HKMECT I I NF S RFMOVFD FROM TESTING. 



R 



PC.TxiFr 



iinsAHl F Al I T\ INURRMFMs. 



THIS .iiBROi ! INF Wtt'iRls FRRi'FV'- 



.■■,51 / THRU t.5,'0 



JSR 
A TPR! 



PC. 1 "Wm P 



Cl Rvl C f '-VI CA 



jRFPOUT M'NAl FRRLR. FROM TX RX. 
;U1'\AFU t All INTl F^RUF^V".. 

TRAP 
(Rt TUF*N TX INT VECTOR 10 l.'NU'>ED F\KV 

IRAP 






MO. w» f.l . ,t RWNHW ;-F ! t RFUIW N"'-HU V^ Ul -.^'l. 



1 1 

HARDWAKt MSI PARI PR 

841/ 054.' .'0 004.'*.,' 1*.'0'.4 ,)*U* PC.fnP'.HR jHtPUHT I RH(JR ',> tMMAR ] I.'. U' CAi i ( [j rOR . 

8418 

84U* 0?4.*:4 OOfSOb" 14VJ0 ^0$ : Cl W CTRl C* ilNDlCAfl: THAT Wt ARt NOT WllHlfi A T['>T. 

84 A> 0?S00v'^ t. NOT ST 

O.'^SOvV LIOOV: 

Oy.^K'^O 104401 ^^^^^ CJtT'jT 



Jl 



OHU U K'NC 1ST PART4 MACRO 
HAR[)WAtU IhSl DMA 



^i^ MAR rt4 0*^:4H PAGK M/ 



^ECJ ^i*:* 



84. \^ 








. 


84. \< 










84.^4 










84. ^'i 










84.'*-. 










84. \' 










84. '8 










-^4."' > 










84 ^^' 










84 ? 1 










84^.^ 










84 •■ '. 










84 S4 










84 ^S 










84 ?f 


o.^soo.^ 










05S00.: 


Ol.'/OO 


OOOtMO 






O'^'^-^OOt- 


10444 1 






84 5 ■ 




00000 .' 






84 :<8 


o:^soio 


OUV^w* 


00000 ; 


14'>.^4.' 


84 5^1 


0?j01b 


OKN'^'' 


1 7 ■; 7 / ^ 


14S1/4 


8440 


0'S''^Q?A 


Ol.Vfw' 


000001 


1!>0.V..: 


H441 


0550 ^c' 


0h.Vt>/ 


0»'161S 


I'.O.'S^. 


844:^ 


O5'>040 


OKV*-/ 


01<'5V. 


I'^O.^^.^ 


844^ 


O.'i'tO*^'. 


oo^o^/ 


14!:)4.^», 




8444 


O-^^OSt.' 


00V>067 


14S146 




844:, 










H44h 










84 4 ; 










84 48 










844*1 










84 ',0 


0.-^S0'>^> 


004 /o ; 


16r'.'S4 




84 "^il 


05S0f..' 


10^40,^ 






84 !j,? 


055064 


00016/ 


000664 




84'.'. 










H4S4 










84 SS 










84')fi 


0.' ->o/o 






( 




o:^so/o 


01.' /GO 


000 MO 






■''.S0.'4 


104441 






84!)/ 


()5S0/*) 










o.^^o '>, 


Ulr' /4#. 


000^00 






0^510J 


0l.'/4#'> 


0.^'4.>. 






0':MO*S 


016 /4f. 


14'.0'.f. 






5'.U.' 


01? /46 


00000^ 






oy>i\h 


1044^.' 








O^Mr'O 


0*H^/O^l 


000010 




84 SH 


n^'si:'»4 










o'.M.'4 


OK'M*, 


000 ^00 






ofMUi 


01 ■'/4f. 


O.'/.'U. 






5M54 


016/46 


14'>0.'*-. 






0',M40 


0K';46 


00000 '. 






OSS 144 


iij44s; 








0V>14'. 


O'j.'/O*. 


oo<)oio 




84 SS 


OV.IS.' 










u'.M'n- 


01/ ''H.) 


\jO<j.'0O 






os'^.r.i^ 


104441 







;nni HAwowAfu n '\\ dma 

DMA MODfc. TEST ■ 
THIS USt VtHI' Its THAI I'Ht DtVl> UNO(-R TKST COUT) Will. PPHFORM 
TRANSMISSION AND RECEPTION CORRECTLY USINti THE DMA MODE TRANSMISSION. 
THl TEST IS PEREORMED AT AIL BAUORATES (rxCtPT 50 BAUD), 8 BITS PER 
CHARACTER. 1 STOP BU. AND WITH PARITi CHECKINC, (BOTH ODD AND EVEN). 
A HIGH SPFEO T*^ST IS ALSO PEREORMED AI THE HIGHEST ^ BAUDRATES AT 
OOTH S AN*:) 8 BITS PER CHARACTER. 1 iTUP BIT. AND NO PARITY CHECKlNl,. 
THIS TEST IS PI-RFORMEt) WITH THE TYPE 0^ LOOPBACK WHICH WAS SPECIEIED 
IN THJ DUT HARDWARE P TAHi [ ON ALl ACTIVE IINES, 

Bl'.NTST 



SET PR I OPRIOS 



INifM -= TNUM • 1 

MOV OTNlfM, TSTNUM 

MOV O 1 .CIRl l> 

MQV dl.ERRTrP 

MOV 09101 . .ERRNBR 

MOV OEM^lOl.ERRMSG 

CLR ERSMRt 

CLR EERROR 



T7: : 
jALLOW Lie INTERRUPTS. 

MOV I'^PRIOS.RO 

TRAP C5SPRI 

jINCRi-MtNl THE ASSEMBl t TIME TEST COuNTFR. 
iSt T UP ^Ht TEST NUMBER. C^*! ) 

[INDICATi THAI WE ARE IN A TLSI. 
iSET ERROR liPE AS FATAL IN f-RROR TAHl E . 
iSET THE fIRST CRROR NLWBER IN ERROR TARl L . 
:St T ERROR MtSSAGfc ''DDResS IN ERRTBl . 
;INniAlI/E THE "REPORT ERROR SUMMAP i " MAGS. 
;CnAR THE "AT ttAST ONt tRROR" INDICATOR. 



RJ S[ r IHl Out I.! A KNOWN STAIt. REMOvt IH^ STATU'. COOe S EROM THE EIEO. 
ClEAR TX AND RX INTERRUPT t NABL f BIT'. IN THt CSR. 
THIS SUflROUTlNK REPORTS ERROR ^-»»' '*lol «.^<.. 



JSR 

BC-. 

IMP 



PC.Cl.NRST 

*,os 



;Rt',fT THi DHV 11. REPORT AN i t RRURS FOUND. 
;SMP ARO'.-NO riS^ ('.IT U NO M\TAL ERROR KOUND. 
iRESn FAUURV, ABORT THIS TLST. 



,1 r UP M'R 'RAN.^'!! INTt-RRUPlS. 



cM 



St TPRl .*JPR!0 ' 

St TvK. r^Vl CA. .^TxOMri. ,'n'RU'* 



iMvK R' vl- CA, ^R/.CHR'i.OPRlO*. 



^\ IPRl .'n'Rl04 



:Dl-.'Uli t Ai I INTLRR'iPTS. 

MOV 
TR \P 
;SHiCT DMA TX INT SERVlCF RTN. 

M^W 
MOV 
MOV 
TRAR 
ADO 
i'>l I t C^ RX INT it RVICE RTN. 

MOv 
M0\ 
MOv 

I CAP 

Ain> 

jA' 1 Ow \Un RR'iPTS.. 

TRAP 



.-JPRIO.'.RO 
CSSPRI 

i?PR10'.. I sP > 
,';! XOMA, C ^">P ' 
TXVECA. ^SP:' 
W.^, ^sP> 

c $ - V E : 

,7U\-,P 

i?R\CMR'. , ^ ,r > 

RXVi CA. vSPI 

^'M. . St'^ 
$ :i V t 1 

ri ,i ■v;4,R0 
CSsPRl 



HARDWARl Tt^ST 



PAR TO 



MACHO 
- DMA 



MK^OO r.i MAW HA 04:^8 PAUl. l^M 



se.u ^1/ 



84 fH^ 

84(.? 
t^)64 
H4r.S 
84 bt. 
846.* 
8468 
640^- 

84 : 



84 
84 
84 



1 



05"^U80 
0?SU-4 

o,^si ;4 

05^^00 
05*>.X''4 

o?'"nn4 



5 05S 



*0 



M4 /4 
84 "S 
84 .'c 
84 ' ' 

84 ."8 

84:9 

8480 

8481 

848,^ 

848 1 

8484 

848'. 

8486 

848; 

8488 

8484 

8440 

8441 

84 4, i 

84 4 ^, 

8444 

844', 

844^ 

844/ 

8448 

844W 

8S00 

8S01 

8S0,' 

8so:i 

8SU4 
8S0S 
8*'i06 
8S0 / 
8S08 
8:^04 
8^10 
8SU 

8SK: 

8M '. 
8S14 
H'.l', 
e^l6 



o$'^^^t> 



0.1Sc\^4 
03^j?40 

o,s^.;'4ti 

03bc^S6 



0;'j.^64 
051).V0 
0?S,V4 
075.^76 
035504 



Ol.n'OO 
004 ?6 7 
01.^701 
004 76/ 
OKVW? 
0hV03 
01.^/04 
004/6.' 
01.\'6 7 
01^7fe7 



004 /6 / 
10540^ 
000167 

004 76 / 
004 76 7 
01i>767 



004 76 ,' 

005 /6 / 
001406 
5*^76 7 
00100^ 
00016/ 



IHANSMIl AND RtCtlVl. SHORT DATA PATTtRN AT All BAUDRATf-G. 

wriH ft BITS PF.R ChAHACTKH. 1 STOP BIT, AND BOTH TiPtG OF PAPiTr. 
BOTH L INt GROUPS liGPRS) TX AND RX WITH THE. SAME PARAMt.TF.RS. 



00330.' 
16P170 
010470 
163336 
00SIS4 
OOOO.'O 
00000 I 
171374 
1 ,' ;400 
0^1616 



lbS4/.^ 

0004 sr* 

16566.'' 
165536 
021621 



16^700 
144730 

000100 

000406 



4$: 



14S004 
1S0062 



MOV 

JSR 
MOV 

JSR 
MOV 
MOV 
MOV 

JSR 
MOV 
MOV 



*tRCNTB,R0 
PC. CI R16W 
«104 70,R1 
PC.GETTIM 
OSDP;^B,Hc^ 



[CLEAR THK RX tRROR COUNTERS TABt f- . 

[SET UP LPR CONTENTS f'OR TX/RX AT 7S BAUD. 

iGFT TIME OUT BASED ON MINIMUM BAUDRATL IN USE. 

{•iET UP THE START ADR OF THE DATA PATTERN. 



dSDP2E-SDP2Q.R3 iSlT UP THF DATA PATTERN LENGTH. 



fll.R4 
PC, VANsLfP 
017 7400. IBM 
i>9\0?. .ERRNBH 



;SPbCIfr TO SEND 1 DATA PATTERN TO EACH LINE. 
iSET UP "VANILLA FLAVORED" TX/RX. 
iFORM BIT MAP OF UNUSED TX/RX BITS. 
J SET THE ERROR REPORT NUMBER TO 910?. 



THIS ROI'TINE REPORTS ERRORS WITH NUMBERS >>>■- 910:> THRU 9104 <^<<<. 



150032 



144656 



0J5312 012767 021627 14/ 776 5$ 



035 3.'O 
035324 
035330 
055:.3.' 
055540 



035 34.' 
035544 
055350 
035 352 
55 356 
35 360 
03t)364 



004^-6 7 
005 76/ 
00140-^ 
%' /6 / 
001567 



OIOIOO 
042701 
005100 
042/00 
0500U1 
062/01 
105502 



1/0 -'2.' 
144674 

000100 144622 



000100 

1 ,' /6 ; / 
010400 



6 J 



JsR PC.PUFIER 

BCs .»6 

JMP 50 J 

JSR PC.PURRXB 

JSR PC.INID.'..' 

MOV 09H 5. .ERRNBR 



jP '^GE THE OUT KM CEIVE CHARACTER FIEO. 

;ABORT THIS TEST H ^ LEO WOULD NOT PURGE. 

[PURGE THE RX CHAR BU>ER IN MEMOR'f, 
[SEND THE FIRST BATCH 01- DATA PATTERNS. 
;5ET ERROR NUMBER TO 9105. 



THIS ROUTINE f^. PORTS ERRORS WITH NUMBERS >>>>> 9105 THRU 4110 <'<<<, 
JSR 



RLQ 

fiTT 
BNt 
JMP 

MOV 



PC.RDCHRS 

FERROR 

5J 

<miT06, OPTION 

, •6 

50 J 

.rnU. .t RRNBR 



jRFAD AND VERIFi THE RX CHARACTERS. 

[HAS AN ERROR BEEN DETECTED ? 

(NO, THEN BRANCH. 

[HAS EXTENDED ERROR REPORT INU BEEN REQUESTED V 

[NO. THEN EXIT THE TEST . 

i'>E I \ RROR NUMBER TO 9111 . 



THIS HOUTlNf REPORT', ERRORS WITH NUMBERS > > ■ - ^ 4111 THRU 9114 <<<<<, 



J',P PC. 1 "(HREP 

TSI LtRROH 

BEO 6$ 

BlI Obi T06.t^PT10N 

n( 50$ 



jP^PORT f INAl ERRORS f ROM RX/RX. 

[HAS AN ERROR BEEN DETECTED ? 

[NO, THEN BRANCH. 

[HAS EXTENDED ERROR REPORTING BEEN REUUESTED V 

[NO. THEN EXIT THF TEST. 



TOGGlt THt PARIT. TiPl BIT SPECIFIER IN THE !X/RX ^ETUP PARAMETERS. 
SELECT THE NEXT BAUDHATE AND PERFORM THE TEST AGAIN If NOT DONE. 

[COMPl EMENT JH\: PARIT i t iP( 

[ BIT IN THE TX-HX t PR SETUP 

■ PARAMETER I HAVING I HE 

; OTHER [ PR P4RAMETFR 

[ HIT', UNCHANra 0. 

i'A [ [ CT IHt Nt \T MAHURATt . 

iLUOP TO TX/RX AGAIN U' NOT PAST LAl^t t>Al.OKArfc . 

1 PLHKUHM WIOL UPErn DMA TtST. 



MOV 


PI .Rt> 


BIG 


.7UH),K1 


COM 


Mo 


M I C 


o\ ■: >>/; .wo 


Ml', 


Ro.Rl 


*U)D 


.7 1O400.R1 


MCf 


4$ 



1 1 



HARDWARJ 
8M ; 

as.:' I 

8S.'^ 
8Sc-n> 

0s^b 

85c"^ 

8550 

8b?l 

855.^ 

8' ^i 

81^34 

855S 

8536 

853/ 

8538 

853^'* 

8540 

8541 

854c^ 

854 3 

8544 

854'. 

854^. 

854/ 

8548 

8549 

8550 

8551 

855.^ 

855^ 

8554 

8555 

8556 

855/ 

855'v 
H560 
85M 
85*..' 
856', 
8564 
8 5*1 5 
85»j6 
85*.; 
85»,8 
85*-^'^ 
H'i/0 

85/1 
85/3 



1ST 
Tl-ST 



PAFU4 



MACKO M1.''00 
- DMA - 



15 MAR 84 0^:48 PAl,t. 



l3/-c> 



5F.a ^^18 



0355b*i 
0355/0 
0553/4 
0353/6 
035400 
03540.? 
035404 
0554 Ot^ 
055410 
0354 1^' 
055414 
03541b 
0354^2 



005001 

OKVOr^ 

1101.\^ 
105.^01 
0013 'S 
105501 

iioi:v^ 

10'»/01 
0013/4 

iioi:'.' 

005.^01 
0."?01cV 
0C13/3 



00360. 



000040 



0554^4 01^/05 0050/.^ 



554 30 
0554 5.-^ 
055436 
05544^^ 
0354-^ ■> 
05545^ 
055456 
035464 



0354/,^ 
354/6 
035500 

03550*^ 
03551? 



01<^501 
004/6? 

oip/o;^ 

l(:'703 

.P/04 

004/6/ 

O^N'b/ 

0U5767 



163100 
00360.' 
001000 
000001 
1/1136 
1//400 
0c'1653 



004/6/ t65."^4 

103l.^b 

01P76/ 0?l63f, 

004/*,/ 1»,54.\' 

004 767 16^0/6 



03'. 516 001/6/ 1*.544*. 

1444 ."r 



TRANSMIT AND RtCF lv(: 5l<> BtTF DATA PATTERNS AT ALL COMBINATIONS Of 9.6K. 
14. PK AND 38.4K BUADRATF.S AND 5 AND 8 BITS PF.R CHARACTER. USE 1 STOP BIT 
AND NO PARITY GF.NFRATION OR DETECTION. 



INITIALIZE THE 512 BYTE PATTERN AND THE VARIOUS DATA PATTERN POINTERS. 



7S 



8$ 



10$ 



lc?5 



ia4S4r, 

14/6c^fl 



14/610 



Cl W 
MOV 
MOVH 
INCH 
BNE 
DECB 
MOVB 
TSTR 
BNE 
MOVB 
INC 
CMP 
BNE 



Rl 

OBUB/ -1.. 
Rl ,CR^:) ■■ 

Rl 
■'J 
HI 

Rl .CR?)* 
Rl 
8J 
Rl.CR.M. 

Rl 

Rl.flS?. 

10$ 



iCLEAR THE DATA BYTE COUNTER. 

iGET THE BASE OF THE DATA PATTERN BUEFER. 

;WRITt A BYTE OF THE DATA PATTERN. 

itjFT THE NEXT BYTE FOR THE DATA PATTERN. 

jLOOP UNTIL FIRST 1/2 OF PATTERN IS DONE. 

jGET THE NEXT BYTE FOR THE DATA PATTERN. 

[WRITE A BYTE OF THE DATA PATTERN. 

iCHECK FOR DONE WRITING DATA PATTERN. 

;LOOP IF DATA PATTERN IS NOT DONE. 

;WRITE A BYTE OE THE 32 BYTE OVERFLOW REGION. 

iCOUNT THIS B'TE. 

J TEST FOR 32 BYTFS WRITTEN. 

;100P UNTIL 52 BYTES ARE WRITTEN. 



PREPARE TO I OOP ON THE 3 DIFFERENT BAUDRATES (9.6K, 19.?\<, AND 38, 4K). 

t-OV ^DLPRTB.R5 jCiET THE BASE ADR OF THE DMA BAUDRATE TABLt. 

SPECiF 1 THE PROPER BALiORATi . 

SPFCI' ' 8 BITS PEn CHARACTER. 

PERFORM DMA TRANSMISSION AND RECEPTION OF 512 BYTE DATA PATTERN. 

i THE FOLLOWING ROUTINE REPORTS THE ERROR WITH NUMBERS 914 THRU 921. 
J I PR CHANGE BIT ERROR El AGS MA> RE SET BY THIS SUBROUTINE. 

iSfcT UP I PR PNRAM AT NEXT BAUD. 8 BITS/CHAR. 

iGET TIME OUT BASED ON MINIMUM BAUDRATE IN USE 

tSET IIP THE START ADR OF THE DATA PATTERN. 

;SF1 UP THE DATA PATTERN lENGTH. 

;SPECI^t TO SEND 1 DATA PATTERN TO EACH I INt . 

iSFT UP 'VANILLA FLP/ORED'' TX/RX. 

[FORM BIT MAP OE UNUSED BITS FOR 8 BITS/CHAH. 

iSFT ERROR NUMBER 10 0115. 

■RROS WITH NUMBERS >>>-* 911S FHRli 911/ <^<-<. 

[PURGF IHt OUT HICFIVF CHARACTER iVO, 
[ABORT THIS TEST U E It WOUl NOT PURGE. 
lSF T tRROR NL/MBtR TO 9118. 

: PURGE THE RX CHAR H-> ^ ER IN MiMOR^. 
I'lFND rnt FIRM HATCH (W DATA PATTERNS, 



MOV 


tR5)» .Rl 


JSR 


PC.GFTTIM 


MOV 


(«UFBA5,R2 


MOV 


05 1 f' . , R 3 


riUsJ 


01. R4 


JSR 


PC .VANSLIP 


MOV 


01 //400,IBM 


MOV 


^9ir.. .ERRNBR 


! THIS 


WO'/T XK RFPORT 


J'«R 


PC .t'-.'f n R 


BCC 


*,.)5 


MOv 


"9114. ,\ PHNBR 


.I'ltV 


t-'C ,PllWH^^^ 


'M 


MC, INIOf- 



IHI . WiH.lI INt Rt PIIRI 
I'.R PC .WDChRS 



035526 



00140/ 



Mt (J 



y k RROR 
145 



THF FRROR WITH NUMBt R'> > • ^ "^ > 9118 THRl' 91, '3 

jRJAD "^ND VFRIM THF RX CHARAC'EHS. 

;mA , AN \ HHOH fiEt N UEfJ r '.: ; 
[NO, THEN BRANCH. 



f, * •. * V 



[-1 1 



DhU 



n t UNC TST 


PAR I 4 


HACRU Ml 


200 15 


DWARt TFST 




DHA 




8!wM 030*330 


052/6 7 


000100 


144424 


H^.S 0?^:.?n 


0014 70 






8S ;6 








8SV7 055i540 


012767 


021644 


147550 


8578 








8579 








8580 








8581 03554b 


004 767 


1704 74 




8582 055552 


005767 


1444^16 




858? 035556 


001404 






8584 o:-55560 


032767 


000100 


144374 


8585 035566 


001454 






8586 








858 7 055570 


012767 


021650 


.4 7520 


8S88 








858^ 








Hl^'^O 








85<n 








S59c> 0355 76 


042 701 


000030 




8595 035602 


004/6 7 


1/1006 




8594 035606 


012767 


177740 


144416 


8595 








8596 








859 7 








8598 055614 


004 76 7 


165112 




8599 035620 


103055 






8600 03S62? 


012/67 


021654 


147466 


8601 








8602 035630 


004 7b 7 


165300 




8603 035634 


004767 


162754 




8604 








8605 








8606 








860,' O3S64 


004/6 7 


165324 




8608 035644 


005/67 


144 354 




8609 035650 


001404 






8610 0:'5652 


032767 


000100 


144 302 


86U 035660 


001417 






8^.12 








8613 035662 


012767 


021662 


147426 


8614 








8b 15 








8616 








861 i' O.')56 70 


004 767 


170352 




8618 0356 74 


00576/ 


144^24 




8619 035/00 


001404 






8620 035702 


032 76/ 


000100 


144^52 


8621 035710 


001403 






86.^<- 








.':;623 035.'12 


02052/ 


OOSIOO 




8^24 035716 


103644 






86.^5 








M',;'6 








8'-;.' / 








8^.2H 








^.'/c'l 








ecio OiSV^O 
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14$ 



16$ 



18$ 



BIT OBUOb, OPTION 
BFO 50$ 



iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
iNO. THEN EXIT thF TEST. 



MOV fl9124. .ERRNBR ;SET ERROR NUMBER 10 9124. 
THIS rtOUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9124 THRU 9127 <<<^<, 



U5R 
TST 

BEQ 
BIT 

BEQ 

MOV 



PC.TXRREP 

FERROR 

16$ 

OBIT06. OPTION 

50$ 



(REPORT FINAL. ERRORS FROM RX/RX. 

{HAS AN ERROR BEEN nFTrCTFD ? 

iNO. THEN BRANCH. 

(HA5 EXTENDED ERROR REPORTING BEEN REQUtiSTED V 

jNO, THFN EXIT THh TFST . 



<>9128. .ERRNBR jSET ERROR NUMBER TO 9128. 



SPtCUY !• QIT5 PER CHARACTER. 

PERFORM DMA TRANSMISSION AND RECEPTION Of 512 B/Tt DATA PATTERN. 



BIC *50,R1 
)SR PC.VANSUP 
MOV 01 77740. IBM 



Se^ UP CHAR LENGTH PARAM TO 5 BIT^-'CHAR. 

SFT UP "VANILLA FLAVORED" TX/RX. 

FORM BIT MAP OF UNUSED BITS FOR 5 BITS/CHAR. 



THIS ROUTINE RFPORTS THF ERROR WITH NUMBERS >>^ 9128 THRU 9131 <<< 



JSR PC.PUFIFR 

BCr 60$ 

MOV <>9132. .FRRNBR 

JSR PC. PURR XR 

JSR PC.INIDMA 



jPURGE THE OUT RECEIVt CHARACTER KltO. 
;ABORT THIS TFST It- f IHJ WOULD NOT PURGt . 
I SET THE ERROR REPORT NUMBER TO 9152. 

(PURGE THF RX CHAR BlJf ^ ER IN MEMORY. 
iSEND THE FIRST HATCH OF DATA PATTERNS. 



THIS ROUTINt RtPORTS THE ERROR WITH NUMBERS >>>*> 9132 THRU 9137 <<<<< 



JSR 

T'-T 
B» (J 

BIT 
BFQ 

MOV 



PC.RDCHRS 

FERROR 

18$ 

*HIT06,0PTlON 

50$ 



;RtAD AND VERIM THE RX CHARACTtRS. 

(HAS AN FRROR Be t N [IFTFCTtO ? 

[NO. THfN BRANCH. 

(HAS ixTtNOED ERROR RhPORTING BEEN REQUtSTED 

(NO, THtN FXIT TH( Tt ST . 



091^8. .FRRNBR i S(- T ERROR NLfMBER rO 9158. 



THIS ROUTINF REPORT'. THE ERROR WITH NUMBERS 



■» 1 .1 > * 



M138 THRl' 9141 <<<<< 



20$: 
50$: 



JSR PC.URWIP 

I SI M PROP 

BtJ .'OJ 

BIT .7B1 :06. OPTION 

BFQ 50$ 

i MM R5.»Dl PRTt 

hi 12$ 



;R*-PORT ^ INAL ERFORS f RUM RX.RX. 

[HAS AN tRROR BtFN DFTECTFD ? 

[NO. THtN BRANCH, 

[HAS (XTtNOeO ERROR RFPORTING BEEN REUL't S U 7 

jNO. TH^N exTT THt T( >;T. 

[COHPARt Dh:A BAUDRAie TABLE f^TR WITH TABLE FND 
il OOP U NOT ALL BAuORATt-'- [)ONF itT. 



DUNJ . HAvt t ITHt . '^ ■ i 0" I l> ACTlVt I INtS, OR COMPLe TtO THf tlst. 
Df.AHi (- INTtHRiipi .. 
Cn-AR THf INTLf^MHM' VECTORS. 



c.t: 



EQ 219 



St TPRl WPR10 7 



[OlSAHl <c Al I INTtRRt.iPI 1. 



NI. 



DHL' 1 1 \ 
HAROWAWl 



8651 



8f>:v^ 



8634 
865(5 



8*^?7 
8658 



UNC )ST 
U S 1 

05^7.-^4 
055)7^6 
05'i726 
05575^ 
03^/54 
055V 34 
055740 

05574t' 
055750 
035754 
035754 
055760 
035/6:? 
055 /6^ 
05576f> 
035766 



PARM MACRO M1?00 15-MAR 84 OS»;48 PAbt. 15/ 4 
- DMA 



OUVOO 000540 
104441 

016700 144<>56 
104456 

016/00 I44c"?t^6 
104436 

01c^76/ 0?lb6^ 147546 
004 767 166054 

01? ^00 000 540 

104441 

00506/ l44c?5^ 



104401 



60$: 



ciRvt c Txvrc\ 

CL.RVtX RXVFCA 



MOV 0914t?. .tiHHNBR 

jsR pc.rp:psmr 

SETPRI OPRIO-' 



CI R CTRlCt 

FNOTST 



MUV ^^PRLO/.RO 

I RAP C$^PRI 
[RfTURN TX INl VFCTOP TO UN'.'SF.D POOL. 

r'OV TXVhCA.RO 

TRAP CtCVFC 
jRF.TURN RX INT veCTUR TO UNUSH.D PfJOl . 

MOV RXVtCA.RO 

TRAP CiCVf'C 

\l-ieCI NUMBKR 414. • KJR T Mf. Nf x r HRROR RKPORI. 
RePORT ERROR SUMhARItS IF" CMIiED f OR . 
DI5ABL.F. ALL INTF.RRUPlS. 

Mdv /?PP n.v'.RO 

TRAP CJSPRI 

; INDICATF ThA^ WF ARF NOT jM'-'TN A M- .T. 



\ 100 '.5: 



5PQ ??.0 



TR;»P 



$F r.T 






DHL' 1 ) ^ L>NC 
HARDWARt Tf ■ 



8f.40 

8r4< 
S^4S 

8r-4S 
8^S0 



] PARTn 



66 M 



,Sf,SS 

86S8 

86^0 
8661 

8t>t> ^ 

8664 

8*><b ■ 
H66H 
866^ 

8t. "' 5 
8*-- .*4 
86 ?S 



86 76 



O.V. '.'0 

05S '.'0 
0^'S''6 
05600C 
056004 
056004 
056010 

0560K? 
0560c'»0 
0560c'6 
056054 
05604^^ 
0560S0 
056054 



86 7 7 



yt '6 



05^060 
5*^064 
056066 



0560 .\- 
0560/6 
056100 
056100 
056104 
05*>110 
056114 
056l,>0 
0561?? 
0VnJ6 
5*. 1 ?6 
5615,^ 
V 1 ^6 
05614^' 
056146 
56rjO 



1^6 ^^' 
00140.^ 
00016 7 

OK^•oo 

UV1441 
000010 
01.*76; 
01??fe7 
01? ''^^ 
01?767 
01^767 
00S06 ' 
005067 



004 7f: 7 
1C540? 
000167 



01? /OO 
104441 

01?M6 
01?746 
016746 
01? /46 
1044 5 7 
06? 706 

01? 746 
01?;46 
016/46 
0U'M6 
1044'./ 
06? ^J* 



NACHU Ml?00 
SPISPI) 
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'.KQ c'?! 



»44?00 00000? 

0O0S?'l 

000?40 



000010 

1 7 7 ' 7 ; 
000001 
0?17M 
0\?54.> 
144r 4 

144144 



16'?',. 

0004 56 



056154 0U700 



000540 



OOO^UO 
0?74?6 
14405.4 

00000 5 

000010 

000 500 
0?/?l6 
1.44()?4 
00000 5 

uoooio 

000?0U 



144?4C 
K.4i;? 
1 \ 7?60 
14 7?54 
14 7?50 



. SH T T I KARUWARt T t S T SPL SPO 

(♦»♦♦♦♦♦♦♦*♦♦♦»♦*.♦♦♦♦♦♦<»♦*♦**♦********♦**•♦••♦♦♦♦♦♦♦♦♦♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦* 

!♦ 
1* 
I • 
1* 
i* 



SPLIT SPfcED TtSI 

THIS TEST IS USED TO VERIFY THE SPLIT SPEED CAPABILITIES GK iHt OHUl 1 , 
AND THE CORRECT OPERATION OF THE A t B BAUD RATE GROUP SKKTION. 
THE TEST USES THREf SETS OF BAUD RAiES C58.4.50j l?00.?5i ?000.?400). 
THIS TEST lUl L ONLT EXECUTE IF THf STAGGARFD L.OOPBACK MOOt IS SEL.ECTEtJ, 
THE SPECIAl STAGGARFD LOOPBACK BERG CONNECTOR MU'-.T BE FITTED. 



?5 



HGNTST 

rnPB 1 OPHCK.W? 

hi:j ?< 

JMP 6J$ 

SETPRI OPRIOS 



iCHF-.CK MODi StLECTtD. 

|D0 NOT tXIT IF STALiGeRU L.0P8CK MOOf SFLECTED. 

ifXlT THIS TI-ST. 

I ALLOW LTC INTERRLf-ns. 

MOV 0PRIO5,RO 

TRAP CiSPRl 

I INCREMENT THE ASSEMBL i TIME TtST CO'JNTER. 

iSET UP THE TEST NUMBER. C9?) 

(INDICATE THAT WE ARE IN A ThST. 

(SET ERROR TYPE IN ERROR TABLE. 

(SET THE FIRST ERROR NUMBER IN ERROR TAB', f , 
A£M<>20l,ERRMSG (SET ERROR MESSAGE ADDRESS IN ERROR TABLf . 
LRSMRf (INITIALIZE THE "REPORT ERROR 'J^UMMARt" FLAGS. 



TNUM •• TNt.ilt ♦ 1 

MOV ©TNOM.TSTNUM 

MOV * I.CTRlCF 

MOV «l.ERfiTYP 

MOV i'9;?0l. .ERRNBR 

MOrf 
CLR 



:lr 



FERROR 



(CLEAR THE "AT LEAST ONE ERROR" FiAG. 



J RESET iHt t'UT TO A KNOWN STATE, REMOVE STATUS CODES f RUM THE FUO. 

1 CLEAv? TX AND Rx INTERRltPT ENABLE BITS. 

i THIS SIJ6R0UTINE REPORTS ERROR >->^^ 4?01 <*<**. 

(RESf T THE D"T. 

tAkUlRT 'Ht TE'.T T^ FATAL ERROR FOUND IN RESET. 

( DISABLE ALL INTERRUMS. 

J SET UP DMA TX AND Rx INTERRUPT SERVICE ROUTINES. 



JSR 


PC.CLNRST 


BCS 


. '6 


.IMP 


60$ 



SE TPHT flPMI0 7 

SF T VEC T XVECA , it T XDMA . OPR 106 



■ ETVEC R>VECA,ftRXCHR:3,ePRl06 



bLTPRl OPRIOA 



(DISABLE Al I INTERRUPTS. 

TRAP 
(SELECT DMA TX INT SERVICE RTN. 

MOV 
Mu; 
MOv 
M0\, 
TRAP 
ADfl 
iSElECT RX INI SERVlCt RTN. 

MOV 
MOV 
MOV 
MOv 

AIM) 
lAU-UW INIEHHUPIS. 

MOV 



^PRIO'.RO 
CJSPRI 

0PR106. ■< SF' ' 

i^TJ^DMA, , .1' 
TXVECA, V SP> 
d5. ^ SP ■* 

cjsve: 

tflO.sP 
aPRI06, . ^? ' 

0^XCH6"., > i- ^ 
WnECA. V -.FM 

C;'-vt : 

opr;oa»ko 



c.^ 



RSbniAKf^'^Fsl- 



SI 



8^t< • 
868K 

8t' >0 

8->^.' 
8( '»'. 
8o'i0 

Hr.'V-, 

8^^8 
8f.>*^'i 

8 'OC^ 

8 ;o I 

8 70,' 
8 70? 
8/04 

pros 

8 ,*0 ^ 
8^08 
870^* 
8"'l0 
8'IL 

8;k~ 
8:'l^ 

8/14 

871^ 

8/lf> 
8 ' 1 • 
8/18 
8/1"^ 

8^n 

8 ■\^r' 

8 7.'^ 
8/.-' 4 

8 /.'^^ 

«.\>; 

8-\ 8 

8/:"< 

u ■ » ■ 

T 

H ■ *. r 
8 / 54 



0?MhO 



OS^lb^ 



0561 /t> 



05b.'O^ 
0:^fc.MO 

05hcV\^ 

056^t?6 
0?6?54 
05b(^40 



036?4b 
05625J 
0S6PS4 

036^66 



03*^.^0r' 

05^j^04 

0^*.Mr' 



t*rtRl4 
104441 



01.\'0b 

004 /t. ; 



01.\'00 
004 76 7 



01^70S 
Oh"^f>00 
0U^501 
004 ?h / 
0L?"0.^ 
OK^SO? 
01?504 
0i;V67 

004 /b ? 

01^767 



004 76/ 
1051?6 
0l,?767 

004 76 7 
004 767 



004 /6 / 
00S76/ 

001404 

%^ /6 / 

0014/^ 
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1 ; / / / / 

16 7.\^6 



00 5 50.' 
16USb 



00^100 



00^>l*'i4 



17 7400 14^7.>, 

166444 

0^1/6.^ 14/ObO 



1^4460 

Or>176S 14 70,<4 



I6464f, 
16?3c?*> 



1646/. 
14^/.-'.^ 



000100 14^6S0 



056 5J6 



004 /'. / 
00^^/67 






TRAP CJSPRI 



; ^NARlI. TRANSMITTFR'. HN All, LINbS. 



MOV OHAPl NS.H^ 

JSR PC.TXFNOl 



I PASS ACTIVJ I INe fUl MAP. 

it.NABl > TRANSMISSIONS ON ALL L.INLS. 



1 CLtAR tRROR TABU PRIOR TO f^fRrOMING Tx/RX TFST. 



MOV OfcRCNTB.RO 

JSR PC, CI R16W 



ji.t T THE BASf ADDRESS Of THE F RROR COUNTER TBI 
jCLKAR THE RX (RROR COUNTfRS TAEll E . 



( PERfORM SPl IT SPEE-O DMA TX AND RX ON ALL StLF.CTED LINES AT THE: FOLLOWlNC, 

J BALIO RATFS. 

X 58. 4K. ^50 J 1<?00. 7S i c^OOO , 2400. 

! 

'/iNITIALISt DMA TX/RX PARAMETtHS IN THE. CONTROL BLOCK FR FACH or THl tlAi.>n 

I RAILS MF.NTIONEO MBOVt . 

X 8 BITS/CHAR, I STOP BITS. 000 PARITY. 



4$: 



056314 01^767 OPl/75 146774 6$ 



MOV OSPLPRB.Rr^ 

MOV (R5)» ,R0 

MOV (RS).,Rl 

JSR PC.tif niM 

MOV OSDPc^B.R.* 

MOV ft^S). .R5 

MOV (8^)»,R4 

MOV 01 7 7400, IHM 

JSR PC. SPl St-'P 

MOV 09?0c\ .ERRNHR 



it.ET BASt ADDRESS Of LPR PARAMETER TARlL. 

I GET I PR CONTLNTS F OR I IN(.RP 11. 

I GET LPR CONTENTS ^ OR L INGRP I. 

iGET TIME OUT BASED ON MINIMLtl BA'JORATE IN ' Sf 

I St I UP THE START ADR OF THE DATA PATTERN. 

(GET NUMBER OF REPt.-^T TRANSMISSION ON LlNt.HPT 

(GET NUMBER OF REPEAT TRANSMISSION ON LINGRPI. 

iSET THE UNUSED BIT MASK FOR H BITS-CHAR. 

I SET l»P CONTROL BLOCK tiZ, FOR TX/RX. 

(SET THE ERROR NLHIBER TO 4.^0.'. 



THIS ROUTINE REPORTS ERRORS WITH Nl»MBE"RS w. . » ^^q:^ THRu *V04 <s<<». 



JSR PC.PUf IFTf 

BCC 60t 

MOV 0*).>0S. .ERRNBR 

JSR PCPLWRXH 

JSR PC.INTDMA 



(PURGE THE OUT RECEIVE CHARACTER fUJ. 
(ABORT THIS TEST IF FIFO WOULD NOT Pi..*RGt\ 
(SET ERROR NUMBER TO 920S . 

(PURGE THE RX CHAR BLi*^FER IN MEMOR'. 
(SEND THE FIRST BATCH OF DATA PATTfRNS. 



1 THIS ROUTINE REPORTS ERRORS WITH NLtMBERS >^v.. 9,>0S THRU 'i.no **v^^. 



vISH 
TS'/ 

HI U 
HI T 

BEU 

MOV 



PC.HOCHHS 

F E RROR 

tl 

OH I T 06. OPT I ON 

SO $ 



(READ AND VERIF i THE RX CHARACTER'^. 

(HAS AN ERROR BEEN DETECTED / 

(NO. THEN BRANCH. 

(HAS EXTENDED ERROR REPORTING BEEN RtUUE'lUO 

(NO, THEN EXIT THE TE sf . 



O^.'U . .ERRNHW jSM THl ERROR NLfMElE R \0 Vlt. 



( THIS WOUTINt RtPURl'' ERRORS WITH NUMBER'. .v^^» '>,'ll ThRi' ^i.H'^ .^.w. 



JSF! 
1ST 



PC, TtWHLP 
U.RHOR 



[RtPURI * IN'U ERROR'- tROM H\ R\. 
(HAS AN ERROR OLtN OLTLCTtU ; 



SFO ??7' 



DP 



mHoM"^^^.V'' ''"'''' ^"^(iPPr.PA'^"^' ''' 
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'>FQ PP5 



8 '^S 
8,■5^ 

8 .\^8 
8:5^ 
8. "40 
8'4L 
8 '4.^ 
8:4? 
8744 
8.'4S 
8.'4t> 
8^4 ' 
8 748 
8:4^ 
8 T>0 
8^^j1 

8 ;'>. 

8 "S^ 
8 '54 

8;ss 

8756 

87S7 

87S8 
8 7S'-* 

8 760 
87r.l 
87»>..' 

h;o.< 

8 :64 

8 ''■J 7 
H 768 

M .' ,'0 

8 ; ; 1 
8 / / ^ 

M,"4 
8 7 7«, 

8 7 :*-. 

8 7 7 7 

rt; /fi 

8 7 7S 
8 780 
8/81 
8/8. 
8 /*^ ', 
8/84 
8/H', 
8 79*. 
8 78 7 



^/aa 



05f.5?4 
056 54. > 



001404 
00145 7 



000100 I4 5b.\l 



05h544 Ol?7b7 OcM 7 / 7 14^744 



05t>?5,' 
0?*:.?ri4 
056J^>^^ 
036560 
05^5^.' 
05b 5o 4 

05657^2 



056576 
03640.^ 
056404 

0564 IJ 
056416 



0564.\^ 
0564^6 
O5o4 5.' 
05f> 4 54 
05644;' 



010,M6 

OiOlOO 
0U\'01 
01050.^ 
010405 
010^04 
0U?60.^ 
004 767 



004 76 7 
10505c' 
01^767 

004 7^ 7 
004767 



004 76 7 

005 /6 7 
001404 
05r'767 
00141? 



166506 

164 5 50 

0^?00.^ 146704 

164 516 
16217,? 



16454.^ 
14 557.' 

000100 1455A1 



056444 0ia767 0^2010 146644 



0564^? 
056456 
0564f>c* 
056464 
OV>4 7? 

0564 74 
056500 



0V>50._' 

'"i5»,.^>0..' 
056506 
■'56510 
05^510 



004 76 7 
00576 7 
001404 
05?767 
001405 

Or^OSC' 7 
10564^ 



1'^75.'0 
14 554c' 

000100 145470 



005150 



Oh' 'tMl 

10444 1 
016700 



000 540 
14 5454 



Bm 8$ 

H\\ 0^1 T06,oprrnN 

BFU 50$ 



(NO, THtN BRANCH. 

iHA*; fXTFNntO FPRdR RFPORTTN'') HFFN Hf-QUFSTF.D 7 

jNO. THFN f XIT THh T( Si . 



rtt: MOV V)qpi5. ,FRRNBR jSFT FRROR NI'MHFW TO 9;n5. 

SWAP PARAMKTfcRS TO ALl OW FOR BOTH CHANNFLS 10 BL FXtRCISFD. 

(PUSH THt START AODRFSS ONTO THE STACK. 
I 

I SWAP THF TWO SF TS OF 
I PARAMFTtRS OVtH. 
1 

tRFSTORt rne start adorFtS. 

(SET UP CONTROL. BLOCK FTC. FOR TX/RX. 
1 THIS ROUTINE REPORTS FRRORS WITH NUMBERS >>>>> 9<n5 THRU ^?1 7 <^<*^, 



MOV 


P^ fSP) 


MOV 


. 1 » 

c. 


MOV 


I-; HO 


MOV 


P. .'-Jl 


MOV 


R5.R,> 


MOV 


R4,R5 


MOV 


R..'.f;i 


MOV 


(sp). ,r:' 


JSR 


PC , 5Pl SUP 



JSR PC.PUFIFR 

BCC 60t 

MOV 09P18. .ERRNBR 

JSR PC.PURRXB 

JSR PC.INIDMA 



iPURGt THt OUT RECEIVt CHARACTER FIFO. 

; ABORT THIS TEST IF FIFO WOULD NOT PURUF . 

J SET ERROR NUMBER TO ^rUfl. 

:PUftGE THE RX CHAR BUFFER IN MtMORi. 
jSENO THE FIRST BATCH OF DATA PATTERNS. 



I THIS ROUTINE REPORTS ERRORS WITH NUMBERS >^>>> 9218 THRU 9?.?^ <<<<■<, 



lOS 

; 



JSR 
TSI 

BEQ 
BIT 

BFQ 

MOV 



PC.RDCHRS 

F ERROR 

10$ 

061106. OPT ION 

50* 



jREAD AND VERIFl THF RX CHARACTERS. 

iHAS AN ERROR BEEN DETECTED ? 

I NO, THEN BRANCH. 

;HAS EXTENDED ERROR REPORTING BEEN REQUESTl-.D ? 

(NO. THFN EXIT THE TEST. 



09224. .ERRNBR tSFT ERROR NUMBER TO ')224 . 



I - 



12$ 



THIS ROUTINE REPORTS FRRORS WITH NltMBERS ^>>-> 9224 THRU 9,\^7 <.*<.. 

iRtPORI F INAL ERRORS FROM R\RX. 

jHAS AN ERROR BFEN DFTFCTFD > 

J NO. THEN BRANCH. 

jMAS EXTENDED ERROR REPORTING. UEFN HEUUFsTEO ; 

jNO. THEN EXIT THF TFST . 

t CHECK IF AIL PARAMF TERS HAVt HEFN pONt . 

{IF NOT DONE LOOP TO SFIFCT THE NFX^ PARAHETFR. 



JSR 


PC, IXRRFP 


TST 


F FRROR 


R[ 


12$ 


HIT 


OBI r06. OPTION 


BtU 


50$ 


CMP 


RS.OSPl PRF 


HI 


4$ 



DlSAHt t INTIRRUFM ,. 

CI EAR IHt INURRtiJ'T VECIORS. 



50$ 



'»[ TPRl OPRIO/ 
CLRVt.C TxvtCA 



jDlSABl \ i\[ I INTFRRUPT';. 

NO^ ■"•S^ '.v' • ,1^0 

jRtlURN Tx LN! VECTOR '0 UNUSl r ^'^^U . 

M0\ 1\W CA,^;2 



DHL' U » L'NC IS) 


PAR 14 


MACRO MU^OO 


HAROWrtRi Tl ST 




- SPLSPO 


0?6r-.14 


104456 




8 ."t^^ 






8»0 05^•■U6 


OhVh7 


0.V014 146 


i?'^l 0565.^4 


004-'?^ 7 


16S500 


,h;«.->.^ 05bS50 


OOSObV 


143464 


37^5 05bS54 






05^^54 






03b!5M 


104401 
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60$ 



MOV 
JSR 

CLR 
ENOTSI 



O'^^^.^H . . (.RRNBR 

PC.RbPSMR 

CTRLCr 



iShL.tCr NUMBKR '*c'.?.8 

jREPORT ERROR S 

J INDICATE THAT WE ARE 



•"^EQ ^^4 



TRAP 



CiCVhC 



FOR THF NfXT t-RROR RFPORT 
IF CALt ED rOP. 
NOT WITHIN A TtST. 



L 10054 



TRAP 



C$ETST 



OHl.i 11 KiNC TST PAR TO 

HARDWA^^t re ST 



MACRO Mlr^OO 15-MAR-84 09:48 PAGt 1^9 
RBPBHP 



SE.Q ^^ij 



8 »S 








, 


8:^6 










8 ,'9; 










s:^s 










s:^^} 










8800 










8801 










880.' 










^^0}> 










8804 










880S 


05t.SJ^. 
03655^ 








8806 




000011 






880/ 


03655b 


01f?767 


000011 


145514 


8808 


056544 


01?r67 


1 7 7 7 7 7 


145446 


8809 


03655? 


01670r 


145/5.' 




8810 


056556 


01 ^/05 


00^5 IJ 




8811 


0565b.' 


0J0.-^0? 






881.' 


056564 


001411 






88 1 ? 










8814 










881^; 










88 In 










881V 










8818 


036566 


0K^70l 


015746 




8819 


0365/:' 
0365 .\' 
0565/4 
05657b 
056600 


104455 

0^:.'L^5 
01?5VJ 
0156.^6 






88.ni 










88.n 


05660;: 


01.' 76 7 


00:?5K_' 


14 5/00 


88.^-^ 










88.;^ 


5^610 


00506 7 


14 5404 


( 


88^4 


0^f.f.l4 
i)5*-.M4 
056614 


104401 







SBTTl HARDWARE Tf.ST RBPBMP 

t* ^i**************************************** ♦*♦****♦♦♦♦*»»♦ ♦*****^ ***♦♦♦**♦*♦♦ 

* - REPORT ANY BMP CODtS IN THE QUEUt 

♦ THIS iS A PStUOO-TESI USED TO REPORT ANY BMP CODE*-. THAT UFRK FOUND 

♦ IN THE DUT'S FIFO DURING PREVIOUS TEST, AND LOGGED IN THE f;MP CODE 

♦ QUEUE . 

* IT IS UNLIKtl t THAT RUNNING THIS PSEUDO-TEST ALONE WILL PRODUCE AN f 

* ERROR REPORTS. 
♦ 

BGNTST 

T9: : 
(INCREMENT THE ASSEMBLE TIME TEST COUNTER. 
iSET UP THf TEST NUMBER. (95) 
(INDICATE THAT Wt ARE IN A TlST. 
(GET THE CONTENTS OF THE POINTER . 
(GET THE START ADDRESS 0^ THE QUEUE. 
(SEE IF THE POINTER HAS MOVED FROM THE tJASE . 
(EXIT NO CODES IN THF QUEUE. 

THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 

(REPORT ERROR BMP CODE FOUND IN TESI NN, BMP CODE :NNNNNN" 



TNUM 


•= TNUM » 1 


MOV 


*TNUM,TSTNUM 


MOV 


d l.CTRLCF 


MOV 


BMPCQP.R? 


MOV 


*eMPCQB,R3 


CMP 


Ra,R5 


BEQ 


60$ 



MOV 
ERRDF 



<>EM4504,R1 [PASS THE FIRST MESSAGE TO Ot RtORTU). 

9301.EM9301.ER9501 ( >-»>^> ERROR ^9301 < ^ ^ •- ' . 

TRAP CJFHDI- 

.WORD 9501 
.WORD [M'*501 
.WORD ER9501 



60$ 



MOV 

CI H 
ENDTST 



^HMPCQB.BMPCQP 
C TRICE 



(St T POINTER RACK TO TH( BEtaNlNG OF THl QUE. 
[INDICAU THAI WE ARE NOT wITHiN A TEST. 

'. 10055: 



TRAP 



C$EVSr 



1(- 



DHu 11 * UNC un 


PART 4 


MACRO MIJOO 


1'.^ 


HARDWARE TKST 




■ RtPHMP 




t^t^?s^ 








Pt^?*; 








88,^^ 








8856 








88;'; 








8858 








88?'-'» 








88'iO 








8841 








884,' 








884 5 








8844 








884S 








884b 








884" 








8848 0Jb6U> 








056blb 


0000c\: 






0566^0 








884 ^» 








88S9 








8860 0366c'0 








056620 


000051 






0366.\^ 


0566b4 






05b6^4 


loOOOO 






0366^6 


177776 






88bl 








886^ 056650 








056*. 50 


001051 






0566 5 J 


05b W^ 






056654 


OO004O 






056656 


0007 76 






8865 








8664 56640 








056640 


00^05? 






5664.^ 


056/5^ 






056644 


1 7 ; 7 7 -^ 






056646 


000000 






056650 


177777 






886^ 








6866 0566').: 








566 5. -> 


0050 5.^ 






0566b4 


056/65 






0566^16 


0005// 






0566ti0 


000001 






05666? 


OOOOO'i 






886 ,■ 








M868 








886^^ 056Kt>4 








0566t,4 








HM ,'0 








MM ; ; 








66V6 056^64 


105 


I. '5 


I.'/ 


05>')f>^,' 


040 


101 


104 


056*,/.-' 


104 


l.\' 


IJ'. 


056*' '■ J 


1/5 


I." 


U/(? 


036/00 


040 


000 
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'.eO c^^fy 



.SUTTL. HAROWARt. PARAMETER CODING SECTION 



THt HARDWARE PARAMETER COOING SECTION CONTAINS MACRUb 
THAT ARE USED BY THt SUPERVISOR TO BUILD P- TABLES. THf 
MACROS ARE NOT EXECUTED AS MACHINf INSTRUCTIONS BUT ARF 
INTERPRETED By THE SUPERVISOR AS DATA STRUCTUHtS. THf 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THF OPERATOR. 



BGNHRD 



:OEVICE CSR ADDRESS QUESTION: 

GPRMA HWPTQI.0,0, 160000, W-" 77^^. 'FS 



;DEVICfc INTERRUPT VtCTOR aut'>nON: 

GPRMA HWP TQc? .<>, 0.40. 776. YES 



L$HARD 



J ACTIVE 



I INES 
GPRMD 



BIT MAP QUtsriON: 

HWP TQ5 ,4,0, MAPI NS , , MAPLNS . t E h 



jTYPE OF L JOPBACK Uut^rION: 

GPRMD HWPTU4 .6 . . ?7 ' , I , S » > Es 



i NDHRD 



HWPTQl; ,ASCI/ /CSR A0DHL1*S: / 



UIUU36: 



WORD 110036 -LJHARU/? 



.wo«o 


T scoot 


.WORD 


HWP Tin 


. WORD 


T51 Jl.lM 


.WORD 


TSHILIM 


.WORD 


T scoot 


.WORD 


HWPTlJ/ 


. WORD 


T $ I Ul I M 


.WORD 


t$hilim 


.WORD 


r scoot 


. WORD 


HWP 1 5 


.WORD 


MAf-^l N- . 


.WORU 


T SLJl IM 


. WORD 


rSHU.IH 


.WORD 


r scoot 


.WORD 


Hw^nQ4 


.WORD 


5 / ' 


.WORD 


T SI LU.IM 


.WORD 


rsHlLlM 



.tV£N 



-I.) 



BS^'oiAR^'^SRi^,^ 


PAR 14 HA 
FER COOING 


CRO M1?0 
Sf.CTTON 


15 


88 V9 0J6/0/ 


ill 


116 


1?4 


056 705 


105 


1?? 


1?? 


056710 


1?5 


1?0 


1?4 


036/15 


040 


1?6 


105 


056/16 


105 


1?4 


117 


056 /cU 


12? 


040 


101 


0567.?4 


104 


104 


1?? 


0567 J 7 


105 


1?3 


1?5 


056 7 5c^ 


0/? 


040 


000 


8880 056 ;5h 


101 


105 


1?4 


056 740 


Ul 


1?6 


105 


056/4 5 


040 


114 


lU 


056 74h 


116 


105 


040 


056 7rU 


10? 


111 


1?4 


056 /"j4 


040 


115 


101 


056 /S/ 


1?0 


07? 


040 


05676;^ 


000 






8H81 056765 


1?4 


151 


1?0 


C 56766 


105 


040 


117 


056 //I 


106 


040 


U4 


056774 


117 


117 


1?0 


0567 7 7 


10? 


101 


105 


05700? 


115 


040 


050 


05/005 


061 


075 


111 


05/010 


116 


l?4 


105 


057015 


i?r 


116 


101 


057016 


114 


054 


040 


0570.'^1 


06? 


075 


110 


0.*^ /0^4 


065 


060 


06c* 


0^70^7 


071 


040 


117 


05/05? 


1?? 


040 


110 


057055 


065 


06? 


06/ 


05 7040 


067 


054 


040 


05/04 5 


065 


0/5 


110 


05/046 


065 


06? 


065 


0570^1 


015 


01? 




888? 5/05 5 


040 


040 


040 


5/056 


040 


040 


040 


5/061 


040 


040 


040 


5 70(^4 


040 


040 


040 


C 5 706 7 


040 


040 


040 


05/0/? 


040 


040 


040 


OVO/5 


040 


040 


064 


05. '100 


0/5 


115 


11 / 


0^/i05 


104 


105 


115 


5/1 06 


054 


040 


065 


05 nn 


0/S 


115 


105 


05/114 


151 


10? 


11/ 


o'>ai7 


101 


1?? 


104 


o'-n?? 


040 


105 


10^ 


0'./l?5 


110 


11 / 


OM 


o:5/iio 


Otd 


040 


000 


HH^ ' 








8^84 
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.F-o ??; 



HWPTU^: .ASCI/ /INTtRRUPT VtCTOR At)DRF.55: / 



HWPTQ3; .ASCI/ /ACTIVE I INF BIT MAP; / 



HWPTQ4: .ASCII /TYPE OF LOOPBACK (l-INTERNAL. ?=H50?9 OR H5^77, 3=H3?'j/a5>< 1? > 



.A5CI/ / 



4-MUOtiM. S-KtlOOARQ tCHQ 



.LVtN 



DMU U K'NC iST P/UU^ MACRO MK:'00 
HAROWARi PARAHt'TKR CODING SECTION 



15 MAR a^l 09:48 PAGt. 141 



'.t-Q '^■^e, 



^.'^*.< 








t 8^*4 








f38')S 








t^8^*^ 








88^* ■ 








?8">8 








{<H^*'-t 








8 000 








t*QOl 








8 -»0/ 








8^0^ 








H'-'ioa 








8^tOS 








B'^'Ob 0?.*174 








0.'.,'1.^4 


000017 






Ol'irU'ib 








8 -.to ' 








8-»l^ 








8917 o:^;i?fe 








o;f .'i,^b 


000130 






o:f;i4o 


05/174 






0^714^ 


0000?0 






8918 








8919 0:".7144 








05/144 


000130 






0?./14r> 


037.-'50 






o?;'/i'"-.o 


000040 






89.\i 








89?1 0;V,'11j.' 








o;^71!:n^ 


000130 






05/1S4 


03/3 50 






037156 


000100 






89r\-^ 








as,", 








8'*.^4 








a9?S 0,^/H>0 








037160 


006044 






8^>,>, 








84,^' 








89^8 O.VU,.' 








0.5/16.-' 


0010^? 






03/1.64 


03/363 






03/lh6 


1 / ; / / / 






03/1/0 


OOOOOO 






0.5 /r/r* 


17777"' 






8'»,"# 








8950 05.'1 ;4 








037174 








8'*'. 1 








89'-.' 








8939 0../1 /4 


ir.' 


lOf. 


Ic.'O 


5/1// 


11 / 


i:\^ 


1.-4 


ij5 /."'O.' 


040 


i.^'. 


LI'. 


5/;'u'. 


111 


1.'4 


(,no 


05/. '10 


1 1*. 


i.'s 


11!. 


03/J13 


10.* 


105 


U'.^ 



.SOTTL. SOKTWARt: PARAMt-TFR CODING SECTION 



t * • 



THb. SOPTWARr. PARAMETER CODING SECTION CONTAINS MACRO*^ 
THAT ARt USe.D BY THt SUPERVISOR TO BUILD P TAtUt.S. THr. 
MACROS ARt NOT F.XECUTF.D AS MACHINE TNSTRi JC I IONS HUT ARE 
INTERPRETED t'Y THE SUPERVISOR AS DATA STRUCTURES. THt 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



BGNSFT 



iUNlT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQ1.0.?0.YES 



;REP0RT NLfMB OF BITS TESTED IN DMA ADDR TEST QUESTION: 
GPRML SWPTQ?, 0.40. YES 



i EXTENDED ERROR HI- PORTING Out sT ION: 
GPRML SWPTa3.0.100.YES 



LSSOET : : 



.WORD L1005/-L$SOrT/a 



.WORD T JCUDE 



.WORD 



.WPTQl 



.WORD ?0 



.WORD 1 >CODE 



.WORD 



)WPTQf' 



.WORD 40 



.wurn) I scoDE 



.WORD 



.WPrQ3 



.WORD 100 
IF EXTENDED ERROR REPORTING IS NOT REOUIRED THEN SKIP THE NEXT QUESTION. 



•NUMBER 0^ INDIVIDuAl DATA ERRORS TO RtrORT ON A LINE QUESTION: 
GPRMD SWPTU4,?,D.I/-'/.'V.0.1/7//7,tES 



.WORD T$CODE 



.WOi^D T JCODt 
.WORD SWPr04 



.WORD 



1 / • / ■ • 



?.i: 



ENDsrr 



L1003/: 



.WORD 1 51.01 in 
.WORD T $HiLlM 



.EVtN 



SWPTQl: .ASCI/ /REPHRT UNIT NLHlh R AS e ACH UNIT IS TESTtO 



J.:' 



DHU VI i OUC TST PART^ MACRO MIJOO 
SOrrwARfc PARAMtTtR CODING SECTION 



lis MAR 64 09:48 PAUt 1^1-1 



lEQ ??/^ 



8940 



«941 



«'M:^ 



^944 



o5/^^l 

0?/.\>4 
0??.?.^* 
05<\^iJ 

o;^'.'?4o 
o^-\^4;^ 

c :. .'.-■'SO 

o?;^>M 
o.^;:''e^4 

0^7.V.^ 

o?/^:*s 
o??:soo 

0?7S0^ 

o,^/?u 

0.^,'514 

03/ii; 

OS 7?.^") 

037555 
05 .'55b 
057541 
03 7544 
03/547 
0575b.^ 
0575^3 !i 
03/5fjO 
05 7 56^ 
057 566 
057371 
03/3/4 
03/5/7 
03740.' 
0^/40^ 
057410 
037413 
03/416 
0^/4en 
0^/4c»4 
03/4.'/ 
03/45.' 
03/4 5S 
03/440 
3 '44^ 
03/44fj 
037451 



040 
040 
105 

1^4 
li'^5 
10!"> 
Wb 
040 

li! 
040 

ir:^ 
i.\-^ 

106 

111 

040 
l.\3 
104 

lib 
lis 

101 

1?L.' 

lOS 
07.^ 
lOS 

lor. 
ior> 

lOli 

11/ 

11/ 
111 

07P 
116 
10? 
040 
040 
104 

111 

101 
104 
101 
1?2 
l.V 
l.?4 
IJJ 
11/ 
040 
040 
114 
lOS 
000 



101 
lOS 

no 

116 
040 
040 

i?:> 

1C4 
000 
lOli 

lib 

10? 

040 

040 

l?.A 

l?A 

1?4 

040 

040 

101 

104 

040 

1?5 

040 

150 

116 

104 

\?.?. 

1?? 

105 

1??. 

116 

040 

1?^ 

105 

117 

111 

111 

104 

114 

101 

040 

1?? 

123 

11/ 

105 

1.'? 

11/ 

101 

111 

072 



1?5 
101 
040 
111 
111 
1?4 
KM 
07? 

1?0 

1?4 

lc>5 

105 

117 

10? 

1?5 

105 

105 

111 

104 

040 

104 

1?4 

1?4 

000 

1?4 

104 

040 

12? 

040 

1?0 

1?4 

10/ 

000 

115 

1?? 

106 

116 

1?6 

l?5 

040 

1?4 

105 

11/ 

040 

040 

1?0 

1?4 

116 

040 

1 U- 

040 



bWPTQ2; .ASCI/ /REPORT NUMBER OF BITS TESTED IN DMA ADDR TEST: / 



SWPTQ3: .ASCIZ /EXTENDED ERROR REPORTING: / 



SWPTQ4! .ASCI/ /NUMBER OE INDIVIDUAL DATA ERRORS TO REPORT ON A LINE 



.LveN 



Kc^ 



DHU U KUNC TST PARTO MACRO lil.>00 
SOF'TWARt PARAMtTbR CODING StCTION 



15 -MAR 84 09:48 PAGK X^? 



'.tU ^50 



89S4 

89sr-. 

8^*1>6 

8964 
89f>S 
8'>^t^ 
8^^ ' 
8968 



8^*b^» 

89 72 

8'* .'5 
89 ,'4 
89 /S 

89/6 
8977 



05743^ 
03745^ 



057rvV 

o?;7s.M 

05;").?6 
057bc>b 



$PATCHi! 



.BLKW 24 



l.ASTAD 



000000 
000000 



.f VF^4 
.WORD 
.WORD 



L$UASr:i 



ENDMOD 



000001 



XHO 



DHU 11 f-UNC TST 
SrMROl TARl K 



PART4 MACRO MiaOO 15 MAR 84 09'.AH PAGF U? I 



^bCJ ^51 



ACTl NS 


oopi;.*^ G 


CHCNTB 


005442 G 


C$0PEN- 


000034 




EF9013 


007141 G 


ENDIT 


050400 


AD OR 


0^5320 


CHKEXT 


016516 G 


CJPNTB" 


000014 




EF9019 


007206 G 


ERCNTB 


003502 G 


ADR 


000020 r. 


CHKLOS 


016416 G 


C$PNTF- 


00001/ 




f£F9020 


007225 G 


ERLTBL 


003602 G 


ADRPTR 


017270 G 


CHRTOT 


002476 G 


C$PNT5- 


000016 




EF9101 


007306 G 


ERRBLK 


005522 G 


Al TF I D 


016020 G 


CKCHR 


016520 ti 


CJPNTX- 


000015 




EF9103 


007311 G 


ERRMSG 


005320 G 


ASSEMB- 


000010 


CKFRPP 


016756 G 


C$QIO - 


000377 




EF9301 


007557 G 


ERRNBR 


005516 G 


BCOUNT 


002506 (i 


CKINAC 


017150 G 


C$RD8U- 


000007 




EF9302 


0074 55 G 


ERRTYP 


005314 G 


BDRMSG 


010020 G 


CKTRAP 


017256 G 


CiREFG* 


00004 7 




EMLM5G 


013074 G 


ER5MRF 


002500 G 


BITSTO 


035676 


CKTRPD 


017306 G 


CiRESE- 


000055 




EMOlOl 


022070 G 


EROlOl 


015500 G 


BITTBL 


002564 G 


CLKBRL 


002272 G 


CtREVI- 


000005 




FM0102 


022154 G 


ER0505 


014032 G 


BITO - 


000001 G 


Cl.KCSR 


002270 G 


CJRFLA- 


000021 




e:moio5 


010047 G 


ER1603 


014070 G 


BITOO - 


000001 G 


CLKHRZ 


002276 G 


C$RPT ' 


000025 




EM0509 


010105 G 


ER6201 


014162 G 


B^TOl - 


000002 G 


CLKINT 


027146 G 


C$SEFG» 


000046 




EM1601 


010111 G 


ER9001 


014420 G 


BU02 = 


000004 G 


CLKVEC 


002274 G 


CJSPRI- 


000041 




EM4401 


010174 G 


ER9002 


014520 G 


BITO.^ = 


000010 i\ 


CLNHST 


017336 G 


CiSVEC- 


000057 




EM4402 


010224 G 


ER9003 


014676 G 


BIT04 - 


000020 G 


CLR16W 


017360 G 


C$TPRI- 


000013 




EM4403 


010272 G 


ER9004 


015070 G 


BIT05 = 


000040 G 


CONMAP 


017402 G 


DELAY 


017456 


G 


EM4404 


010367 G 


ER9005 


015204 G 


BIT06 = 


000100 G 


CSRA 


002200 G 


DFPTBL 


002150 


G 


EM4405 


010426 G 


ER910: 


015444 G 


BIT07 - 


000200 G 


CSRO - 


000000 G 


DIAGMC- 


^jOOOOO 




EM4406 


010522 G 


ER9102 


015504 G 


BIT08 ■-■ 


000400 G 


CTRLCF 


002220 G 


DLPRTB 


005072 


G 


Eii4407 


010576 G 


ER9301 


015626 G 


BIT09 = 


001000 G 


CiAU ' 


000052 


DLPRTE 


005100 


G 


EM4408 


010660 G 


EVL 


000004 G 


BlTl = 


000002 G 


CJAUTO- 


000061 


DMRU 


017570 


G 


EM4409 


010723 G 


EXCNTB 


005242 G 


BITIO - 


002000 G 


C$BRK - 


000022 


DMTSTA 


002222 


G 


EM4410 


010760 G 


EXTMSG 


013143 G 


BITU - 


004000 G 


CJeSEG- 


000004 


DM16B 


017516 


G 


EM4411 


011007 G 


E$EN0 ' 


002100 


BI]1? = 


010000 G 


CJBSUB- 


000002 


DODMA 


017712 


G 


EM6201 


011054 G 


E$LOAO- 


000035 


BITIS ^ 


020000 G 


C$CEFG» 


000045 


DPENDB 


003142 


G 


EM6202 


011106 G 


FDATA 


002206 G 


BIT14 - 


040000 c; 


CJCl.CK- 


000062 


DPLENB 


003202 


G 


EM6301 


011115 G 


FDATO - 


000006 G 


BIT15 - 


100000 G 


C$CLEA" 


000012 


DPRSQ6 


004642 


G, 


EM8901 


011146 G 


FERROR 


002224 G 


BIT,-^ ^ 


000004 G 


C$CLOS' 


000055 


D.'RSQE 


005042 


G 


EM9003 


011175 G 


FFREM 


002226 G 


B I T :^ 


000010 G 


CiCLPl' 


000006 


DRADRT 


002200 


G 


EM9004 


011215 G 


FINACT 


020002 G 


BiT4 


000020 G 


CiCVEC" 


000056 


DROP 


030454 




EM9006 


011255 G 


FRPSUP 


020062 G 


BITS = 


000040 G 


CJDCLN- 


000044 


OUMY 


033700 




EM9007 


011306 G 


FSLSA 


002206 G 


BIT6 - 


000100 G 


C$DODU» 


000051 


EOPFMT 


005422 


G 


EM9008 


0113/1 G 


FSLSO ' 


000006 G 


bit; = 


000200 ., 


C$ORPT= 


000024 


EDROP 


030532 




EM9009 


011452 G 


F$AU " 


000015 


BIT8 - 


JOO^^OO G 


C$DU ' 


000055 


EF.CON- 


000056 


G 


EM9010 


011476 G 


F$AUTO- 


000020 


BITQ - 


001000 G 


CSEDIT 


' 000005 


EF.NEU- 


000055 
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